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:42:05 +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/t1418222602hx641i7l0a7cc7q.htm/, Retrieved Sun, 19 May 2024 14:56:14 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=265292, Retrieved Sun, 19 May 2024 14:56:14 +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:42:05] [fbbeb95c33c8ff026e5ecae513ae1a4b] [Current]
- R       [Notched Boxplots] [] [2014-12-10 18:45:07] [a30ebaf79f34e9d2b1bcdd5006125d11] 

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

149	NA
139	NA
148	NA
158	NA
128	NA
224	NA
159	NA
105	NA
159	NA
167	NA
165	NA
159	NA
119	NA
176	NA
54	NA
91	NA
163	NA
124	NA
137	NA
121	NA
153	NA
148	NA
221	NA
188	NA
149	NA
244	NA
148	NA
92	NA
150	NA
153	NA
94	NA
156	NA
132	NA
161	NA
105	NA
97	NA
151	NA
131	NA
166	NA
157	NA
111	NA
145	NA
162	NA
163	NA
59	NA
187	NA
109	NA
90	NA
105	NA
83	NA
116	NA
42	NA
148	NA
155	NA
125	NA
116	NA
128	NA
138	NA
49	NA
96	NA
164	NA
162	NA
99	NA
202	NA
186	NA
66	NA
183	NA
214	NA
188	NA
104	NA
177	NA
126	NA
76	NA
99	NA
139	NA
162	NA
108	NA
159	NA
74	NA
110	NA
96	NA
116	NA
87	NA
97	NA
127	NA
106	NA
80	NA
74	NA
91	NA
133	NA
74	NA
114	NA
140	NA
95	NA
98	NA
121	NA
126	NA
98	NA
95	NA
110	NA
70	NA
102	NA
86	NA
130	NA
96	NA
102	NA
100	NA
94	NA
52	NA
98	NA
118	NA
99	NA
48	NA
NA	50
NA	150
NA	154
NA	109
NA	68
NA	194
NA	158
NA	159
NA	67
NA	147
NA	39
NA	100
NA	111
NA	138
NA	101
NA	131
NA	101
NA	114
NA	165
NA	114
NA	111
NA	75
NA	82
NA	121
NA	32
NA	150
NA	117
NA	71
NA	165
NA	154
NA	126
NA	149
NA	145
NA	120
NA	109
NA	132
NA	172
NA	169
NA	114
NA	156
NA	172
NA	68
NA	89
NA	167
NA	113
NA	115
NA	78
NA	118
NA	87
NA	173
NA	2
NA	162
NA	49
NA	122
NA	96
NA	100
NA	82
NA	100
NA	115
NA	141
NA	165
NA	165
NA	110
NA	118
NA	158
NA	146
NA	49
NA	90
NA	121
NA	155
NA	104
NA	147
NA	110
NA	108
NA	113
NA	115
NA	61
NA	60
NA	109
NA	68
NA	111
NA	77
NA	73
NA	151
NA	89
NA	78
NA	110
NA	220
NA	65
NA	141
NA	117
NA	122
NA	63
NA	44
NA	52
NA	131
NA	101
NA	42
NA	152
NA	107
NA	77
NA	154
NA	103
NA	96
NA	175
NA	57
NA	112
NA	143
NA	49
NA	110
NA	131
NA	167
NA	56
NA	137
NA	86
NA	121
NA	149
NA	168
NA	140
NA	88
NA	168
NA	94
NA	51
NA	48
NA	145
NA	66
NA	85
NA	109
NA	63
NA	102
NA	162
NA	86
NA	114
NA	164
NA	119
NA	126
NA	132
NA	142
NA	83
NA	94
NA	81
NA	166
NA	110
NA	64
NA	93
NA	104
NA	105
NA	49
NA	88
NA	95
NA	102
NA	99
NA	63
NA	76
NA	109
NA	117
NA	57
NA	120
NA	73
NA	91
NA	108
NA	105
NA	117
NA	119
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	'George Udny Yule' @ yule.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 & 'George Udny Yule' @ yule.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=265292&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]'George Udny Yule' @ yule.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=265292&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=265292&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	'George Udny Yule' @ yule.wessa.net

Boxplot statistics
Variable	lower whisker	lower hinge	median	upper hinge	upper whisker
LFM_2011	42	97	124	156	244
LFM_2012	2	83	110	141	220

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
LFM_2011 & 42 & 97 & 124 & 156 & 244 \tabularnewline
LFM_2012 & 2 & 83 & 110 & 141 & 220 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=265292&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_2011[/C][C]42[/C][C]97[/C][C]124[/C][C]156[/C][C]244[/C][/ROW]
[ROW][C]LFM_2012[/C][C]2[/C][C]83[/C][C]110[/C][C]141[/C][C]220[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=265292&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=265292&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_2011	42	97	124	156	244
LFM_2012	2	83	110	141	220

Boxplot Notches
Variable	lower bound	median	upper bound
LFM_2011	115.230600064928	124	132.769399935072
LFM_2012	102.865835675704	110	117.134164324296

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
LFM_2011 & 115.230600064928 & 124 & 132.769399935072 \tabularnewline
LFM_2012 & 102.865835675704 & 110 & 117.134164324296 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=265292&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_2011[/C][C]115.230600064928[/C][C]124[/C][C]132.769399935072[/C][/ROW]
[ROW][C]LFM_2012[/C][C]102.865835675704[/C][C]110[/C][C]117.134164324296[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=265292&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=265292&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_2011	115.230600064928	124	132.769399935072
LFM_2012	102.865835675704	110	117.134164324296

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