Repository of Reproducible Computations

Free Statistics

of Irreproducible Research!

Author's title

Author

*The author of this computation has been verified*

R Software Module

rwasp_notchedbox1.wasp

Title produced by software

Notched Boxplots

Date of computation

Wed, 10 Dec 2014 14:24:46 +0000

Cite this page as follows

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2014/Dec/10/t14182215480vghzoqpbu59ium.htm/, Retrieved Sun, 19 May 2024 15:54:05 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=265263, Retrieved Sun, 19 May 2024 15:54:05 +0000

QR Codes:

Paste this QR Code to cite your computation.

Original text written by user:

IsPrivate?

No (this computation is public)

User-defined keywords

Estimated Impact

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)

-       [Notched Boxplots] [] [2014-12-10 14:24:46] [fbbeb95c33c8ff026e5ecae513ae1a4b] [Current]
- R       [Notched Boxplots] [] [2014-12-10 18:42:27] [a30ebaf79f34e9d2b1bcdd5006125d11] 

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

149	NA
NA	139
148	NA
NA	158
NA	128
NA	224
159	NA
NA	105
NA	159
NA	167
NA	165
NA	159
NA	119
176	NA
54	NA
91	NA
NA	163
124	NA
NA	137
121	NA
NA	153
NA	148
221	NA
NA	188
NA	149
NA	244
NA	148
92	NA
NA	150
153	NA
94	NA
156	NA
NA	132
NA	161
NA	105
NA	97
151	NA
NA	131
NA	166
157	NA
NA	111
NA	145
NA	162
NA	163
NA	59
187	NA
NA	109
NA	90
105	NA
NA	83
NA	116
NA	42
NA	148
NA	155
NA	125
NA	116
128	NA
NA	138
49	NA
NA	96
NA	164
162	NA
99	NA
NA	202
186	NA
NA	66
183	NA
NA	214
NA	188
104	NA
177	NA
126	NA
76	NA
NA	99
139	NA
162	NA
NA	108
159	NA
74	NA
NA	110
96	NA
116	NA
87	NA
NA	97
127	NA
NA	106
NA	80
74	NA
91	NA
133	NA
NA	74
NA	114
NA	140
95	NA
NA	98
121	NA
NA	126
NA	98
NA	95
NA	110
NA	70
102	NA
NA	86
NA	130
NA	96
102	NA
100	NA
94	NA
52	NA
98	NA
118	NA
NA	99
NA	48
NA	50
NA	150
NA	154
109	NA
NA	68
NA	194
158	NA
NA	159
67	NA
147	NA
NA	39
NA	100
NA	111
NA	138
NA	101
NA	131
NA	101
NA	114
165	NA
NA	114
NA	111
NA	75
NA	82
NA	121
NA	32
150	NA
NA	117
NA	71
NA	165
NA	154
NA	126
149	NA
145	NA
NA	120
109	NA
132	NA
NA	172
169	NA
NA	114
NA	156
172	NA
NA	68
NA	89
NA	167
113	NA
115	NA
78	NA
118	NA
NA	87
173	NA
NA	2
162	NA
NA	49
122	NA
NA	96
100	NA
82	NA
NA	100
115	NA
NA	141
NA	165
NA	165
NA	110
NA	118
158	NA
NA	146
49	NA
90	NA
121	NA
NA	155
104	NA
NA	147
110	NA
108	NA
113	NA
115	NA
NA	61
NA	60
NA	109
NA	68
111	NA
77	NA
NA	73
151	NA
89	NA
78	NA
110	NA
NA	220
NA	65
141	NA
117	NA
NA	122
63	NA
NA	44
NA	52
131	NA
NA	101
NA	42
NA	152
107	NA
77	NA
154	NA
NA	103
NA	96
NA	175
NA	57
112	NA
143	NA
49	NA
NA	110
NA	131
167	NA
56	NA
137	NA
NA	86
NA	121
149	NA
168	NA
140	NA
NA	88
NA	168
NA	94
NA	51
48	NA
NA	145
NA	66
NA	85
109	NA
63	NA
NA	102
162	NA
NA	86
NA	114
164	NA
NA	119
126	NA
NA	132
NA	142
83	NA
NA	94
81	NA
NA	166
110	NA
NA	64
93	NA
104	NA
NA	105
NA	49
88	NA
NA	95
NA	102
99	NA
NA	63
76	NA
109	NA
NA	117
NA	57
120	NA
NA	73
91	NA
108	NA
NA	105
117	NA
119	NA
NA	31

Summary of computational transaction
Raw Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	1 seconds
R Server	'Herman Ole Andreas Wold' @ wold.wessa.net

\begin{tabular}{lllllllll}
\hline
Summary of computational transaction \tabularnewline
Raw Input & view raw input (R code)  \tabularnewline
Raw Output & view raw output of R engine  \tabularnewline
Computing time & 1 seconds \tabularnewline
R Server & 'Herman Ole Andreas Wold' @ wold.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=265263&T=0

[TABLE]
[ROW][C]Summary of computational transaction[/C][/ROW]
[ROW][C]Raw Input[/C][C]view raw input (R code) [/C][/ROW]
[ROW][C]Raw Output[/C][C]view raw output of R engine [/C][/ROW]
[ROW][C]Computing time[/C][C]1 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'Herman Ole Andreas Wold' @ wold.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=265263&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=265263&T=0

As an alternative you can also use a QR Code:

The GUIDs for individual cells are displayed in the table below:

Summary of computational transaction
Raw Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	1 seconds
R Server	'Herman Ole Andreas Wold' @ wold.wessa.net

Boxplot statistics
Variable	lower whisker	lower hinge	median	upper hinge	upper whisker
LFM_F	48	93.5	115	149	221
LFM_M	2	87	111	148	224

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
LFM_F & 48 & 93.5 & 115 & 149 & 221 \tabularnewline
LFM_M & 2 & 87 & 111 & 148 & 224 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=265263&T=1

[TABLE]
[ROW][C]Boxplot statistics[/C][/ROW]
[ROW][C]Variable[/C][C]lower whisker[/C][C]lower hinge[/C][C]median[/C][C]upper hinge[/C][C]upper whisker[/C][/ROW]
[ROW][C]LFM_F[/C][C]48[/C][C]93.5[/C][C]115[/C][C]149[/C][C]221[/C][/ROW]
[ROW][C]LFM_M[/C][C]2[/C][C]87[/C][C]111[/C][C]148[/C][C]224[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=265263&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=265263&T=1

As an alternative you can also use a QR Code:

The GUIDs for individual cells are displayed in the table below:

Boxplot statistics
Variable	lower whisker	lower hinge	median	upper hinge	upper whisker
LFM_F	48	93.5	115	149	221
LFM_M	2	87	111	148	224

Boxplot Notches
Variable	lower bound	median	upper bound
LFM_F	106.995034822062	115	123.004965177938
LFM_M	103.332418895114	111	118.667581104886

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
LFM_F & 106.995034822062 & 115 & 123.004965177938 \tabularnewline
LFM_M & 103.332418895114 & 111 & 118.667581104886 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=265263&T=2

[TABLE]
[ROW][C]Boxplot Notches[/C][/ROW]
[ROW][C]Variable[/C][C]lower bound[/C][C]median[/C][C]upper bound[/C][/ROW]
[ROW][C]LFM_F[/C][C]106.995034822062[/C][C]115[/C][C]123.004965177938[/C][/ROW]
[ROW][C]LFM_M[/C][C]103.332418895114[/C][C]111[/C][C]118.667581104886[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=265263&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=265263&T=2

As an alternative you can also use a QR Code:

The GUIDs for individual cells are displayed in the table below:

Boxplot Notches
Variable	lower bound	median	upper bound
LFM_F	106.995034822062	115	123.004965177938
LFM_M	103.332418895114	111	118.667581104886

Figure 1

PNG link

Postscript link

PDF link

Parameters (Session):

par1 = grey ;

Parameters (R input):

par1 = grey ;

R code (references can be found in the software module):

z <- as.data.frame(t(y))
bitmap(file='test1.png')
(r<-boxplot(z ,xlab=xlab,ylab=ylab,main=main,notch=TRUE,col=par1))
dev.off()
load(file='createtable')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,hyperlink('overview.htm','Boxplot statistics','Boxplot overview'),6,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Variable',1,TRUE)
a<-table.element(a,hyperlink('lower_whisker.htm','lower whisker','definition of lower whisker'),1,TRUE)
a<-table.element(a,hyperlink('lower_hinge.htm','lower hinge','definition of lower hinge'),1,TRUE)
a<-table.element(a,hyperlink('central_tendency.htm','median','definitions about measures of central tendency'),1,TRUE)
a<-table.element(a,hyperlink('upper_hinge.htm','upper hinge','definition of upper hinge'),1,TRUE)
a<-table.element(a,hyperlink('upper_whisker.htm','upper whisker','definition of upper whisker'),1,TRUE)
a<-table.row.end(a)
for (i in 1:length(y[,1]))
{
a<-table.row.start(a)
a<-table.element(a,dimnames(t(x))[[2]][i],1,TRUE)
for (j in 1:5)
{
a<-table.element(a,r$stats[j,i])
}
a<-table.row.end(a)
}
a<-table.end(a)
table.save(a,file='mytable.tab')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Boxplot Notches',4,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Variable',1,TRUE)
a<-table.element(a,'lower bound',1,TRUE)
a<-table.element(a,'median',1,TRUE)
a<-table.element(a,'upper bound',1,TRUE)
a<-table.row.end(a)
for (i in 1:length(y[,1]))
{
a<-table.row.start(a)
a<-table.element(a,dimnames(t(x))[[2]][i],1,TRUE)
a<-table.element(a,r$conf[1,i])
a<-table.element(a,r$stats[3,i])
a<-table.element(a,r$conf[2,i])
a<-table.row.end(a)
}
a<-table.end(a)
table.save(a,file='mytable1.tab')

Free Statistics

Description of Statistical Computation

Tree of Dependent Computations

Dataset

Tables (Output of Computation)

Figures (Output of Computation)

Input Parameters & R Code