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

Thu, 12 Nov 2009 09:36:04 -0700

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/2009/Nov/12/t12580438700mzshmnejjdgs5s.htm/, Retrieved Fri, 03 May 2024 18:04:09 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=56211, Retrieved Fri, 03 May 2024 18:04:09 +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

155

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

-     [Notched Boxplots] [] [2009-11-12 09:15:09] [3dc15971be5d84d9752feb46f389e582]
-    D    [Notched Boxplots] [] [2009-11-12 16:36:04] [aa8eb70c35ea8a87edcd21d6427e653e] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

2849,27	13,9	139	455
2921,44	17,8	135	461
2981,85	17,9	130	461
3080,58	17,4	127	463
3106,22	16,7	122	462
3119,31	16	117	456
3061,26	16,6	112	455
3097,31	19,1	113	456
3161,69	17,8	149	472
3257,16	17,2	157	472
3277,01	18,6	157	471
3295,32	16,3	147	465
3363,99	15,1	137	459
3494,17	19,2	132	465
3667,03	17,7	125	468
3813,06	19,1	123	467
3917,96	18	117	463
3895,51	17,5	114	460
3801,06	17,8	111	462
3570,12	21,1	112	461
3701,61	17,2	144	476
3862,27	19,4	150	476
3970,1	19,8	149	471
4138,52	17,6	134	453
4199,75	16,2	123	443
4290,89	19,5	116	442
4443,91	19,9	117	444
4502,64	20	111	438
4356,98	17,3	105	427
4591,27	18,9	102	424
4696,96	18,6	95	416
4621,4	21,4	93	406
4562,84	18,6	124	431
4202,52	19,8	130	434
4296,49	20,8	124	418
4435,23	19,6	115	412
4105,18	17,7	106	404
4116,68	19,8	105	409
3844,49	22,2	105	412
3720,98	20,7	101	406
3674,4	17,9	95	398
3857,62	20,9	93	397
3801,06	21,2	84	385
3504,37	21,4	87	390
3032,6	23	116	413
3047,03	21,3	120	413
2962,34	23,9	117	401
2197,82	22,4	109	397
2014,45	18,3	105	397
1862,83	22,8	107	409
1905,41	22,3	109	419
1810,99	17,8	109	424
1670,07	16,4	108	428
1864,44	16	107	430
2052,02	16,4	99	424
2029,6	17,7	103	433
2070,83	16,6	131	456
2293,41	16,2	137	459
2443,27	18,3	135	446
2513,17	17,6	124	441

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	'Gwilym Jenkins' @ 72.249.127.135

\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 & 'Gwilym Jenkins' @ 72.249.127.135 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=56211&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]'Gwilym Jenkins' @ 72.249.127.135[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=56211&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=56211&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	'Gwilym Jenkins' @ 72.249.127.135

Boxplot statistics
Variable	lower whisker	lower hinge	median	upper hinge	upper whisker
AGM	1670.07	2941.89	3499.27	4037.64	4696.96
BH	13.9	17.35	18.3	19.95	23
WLHK	84	106.5	116.5	130.5	157
WLHV	385	413	441.5	461	476

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
AGM & 1670.07 & 2941.89 & 3499.27 & 4037.64 & 4696.96 \tabularnewline
BH & 13.9 & 17.35 & 18.3 & 19.95 & 23 \tabularnewline
WLHK & 84 & 106.5 & 116.5 & 130.5 & 157 \tabularnewline
WLHV & 385 & 413 & 441.5 & 461 & 476 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=56211&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]AGM[/C][C]1670.07[/C][C]2941.89[/C][C]3499.27[/C][C]4037.64[/C][C]4696.96[/C][/ROW]
[ROW][C]BH[/C][C]13.9[/C][C]17.35[/C][C]18.3[/C][C]19.95[/C][C]23[/C][/ROW]
[ROW][C]WLHK[/C][C]84[/C][C]106.5[/C][C]116.5[/C][C]130.5[/C][C]157[/C][/ROW]
[ROW][C]WLHV[/C][C]385[/C][C]413[/C][C]441.5[/C][C]461[/C][C]476[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=56211&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=56211&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
AGM	1670.07	2941.89	3499.27	4037.64	4696.96
BH	13.9	17.35	18.3	19.95	23
WLHK	84	106.5	116.5	130.5	157
WLHV	385	413	441.5	461	476

Boxplot Notches
Variable	lower bound	median	upper bound
AGM	3275.76206758204	3499.27	3722.77793241796
BH	17.7696594804593	18.3	18.8303405195407
WLHK	111.604549050394	116.5	121.395450949606
WLHV	431.709098100788	441.5	451.290901899212

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
AGM & 3275.76206758204 & 3499.27 & 3722.77793241796 \tabularnewline
BH & 17.7696594804593 & 18.3 & 18.8303405195407 \tabularnewline
WLHK & 111.604549050394 & 116.5 & 121.395450949606 \tabularnewline
WLHV & 431.709098100788 & 441.5 & 451.290901899212 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=56211&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]AGM[/C][C]3275.76206758204[/C][C]3499.27[/C][C]3722.77793241796[/C][/ROW]
[ROW][C]BH[/C][C]17.7696594804593[/C][C]18.3[/C][C]18.8303405195407[/C][/ROW]
[ROW][C]WLHK[/C][C]111.604549050394[/C][C]116.5[/C][C]121.395450949606[/C][/ROW]
[ROW][C]WLHV[/C][C]431.709098100788[/C][C]441.5[/C][C]451.290901899212[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=56211&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=56211&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
AGM	3275.76206758204	3499.27	3722.77793241796
BH	17.7696594804593	18.3	18.8303405195407
WLHK	111.604549050394	116.5	121.395450949606
WLHV	431.709098100788	441.5	451.290901899212

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