Free Statistics

of Irreproducible Research!

Author's title

Author*Unverified author*
R Software Modulerwasp_notchedbox1.wasp
Title produced by softwareNotched Boxplots
Date of computationTue, 27 Nov 2007 12:48:45 -0700
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2007/Nov/27/t1196192373q530tkd8qbpl6fo.htm/, Retrieved Sun, 05 May 2024 13:25:45 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=6929, Retrieved Sun, 05 May 2024 13:25:45 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywordsNotched boxplot
Estimated Impact185
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Notched Boxplots] [Paper ] [2007-11-27 19:48:45] [c4516de5538230e4cf0ae0b9d9e43dd3] [Current]
Feedback Forum

Post a new message
Dataseries X:
0,9383	90,8	15	467.037
0,9217	96,4	3	460.070
0,9095	90	2	447.988
0,892	92,1	-2	442.867
0,8742	97,2	1	436.087
0,8532	95,1	1	431.328
0,8607	88,5	-1	484.015
0,9005	91	-6	509.673
0,9111	90,5	-13	512.927
0,9059	75	-25	502.831
0,8883	66,3	-26	470.984
0,8924	66	-9	471.067
0,8833	68,4	1	476.049
0,87	70,6	3	474.605
0,8758	83,9	6	470.439
0,8858	90,1	2	461.251
0,917	90,6	5	454.724
0,9554	87,1	5	455.626
0,9922	90,8	0	516.847
0,9778	94,1	-5	525.192
0,9808	99,8	-4	522.975
0,9811	96,8	-2	518.585
1,0014	87	-1	509.239
1,0183	96,3	-8	512.238
1,0622	107,1	-16	519.164
1,0773	115,2	-19	517.009
1,0807	106,1	-28	509.933
1,0848	89,5	-11	509.127
1,1582	91,3	-4	500.857
1,1663	97,6	-9	506.971
1,1372	100,7	-12	569.323
1,1139	104,6	-10	579.714
1,1222	94,7	-2	577.992
1,1692	101,8	-13	565.464
1,1702	102,5	0	547.344
1,2286	105,3	0	554.788
1,2613	110,3	4	562.325
1,2646	109,8	7	560.854
1,2262	117,3	5	555.332
1,1985	118,8	2	543.599
1,2007	131,3	-2	536.662
1,2138	125,9	6	542.722
1,2266	133,1	-3	593.530
1,2176	147	1	610.763
1,2218	145,8	0	612.613
1,249	164,4	-7	611.324
1,2991	149,8	-6	594.167
1,3408	137,7	-4	595.454
1,3119	151,7	-4	590.865
1,3014	156,8	-2	589.379
1,3201	180	2	584.428
1,2938	180,4	-5	573.100
1,2694	170,4	-15	567.456
1,2165	191,6	-16	569.028
1,2037	199,5	-18	620.735
1,2292	218,2	-13	628.884
1,2256	217,5	-23	628.232
1,2015	205	-10	612.117
1,1786	194	-10	595.404
1,1856	199,3	-6	597.141
1,2103	219,3	-3	593.408
1,1938	211,1	-4	590.072
1,202	215,2	-7	579.799
1,2271	240,2	-7	574.205
1,277	242,2	-7	572.775
1,265	240,7	-3	572.942
1,2684	255,4	0	619.567
1,2811	253	-5	625.809
1,2727	218,2	-3	619.916
1,2611	203,7	3	587.625
1,2881	205,6	2	565.742
1,3213	215,6	-7	557.274




Summary of compuational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time1 seconds
R Server'Gwilym Jenkins' @ 72.249.127.135

\begin{tabular}{lllllllll}
\hline
Summary of compuational 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=6929&T=0

[TABLE]
[ROW][C]Summary of compuational 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=6929&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=6929&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 compuational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time1 seconds
R Server'Gwilym Jenkins' @ 72.249.127.135







Boxplot statistics
Variablelower whiskerlower hingemedianupper hingeupper whisker
$0.85320.96661.18211.23911.3408
RA6691.7110.05192.8255.4
CV-23-9-3.5115
WH431.328508.049556.303589.7255628.884

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
$ & 0.8532 & 0.9666 & 1.1821 & 1.2391 & 1.3408 \tabularnewline
RA & 66 & 91.7 & 110.05 & 192.8 & 255.4 \tabularnewline
CV & -23 & -9 & -3.5 & 1 & 15 \tabularnewline
WH & 431.328 & 508.049 & 556.303 & 589.7255 & 628.884 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=6929&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]$[/C][C]0.8532[/C][C]0.9666[/C][C]1.1821[/C][C]1.2391[/C][C]1.3408[/C][/ROW]
[ROW][C]RA[/C][C]66[/C][C]91.7[/C][C]110.05[/C][C]192.8[/C][C]255.4[/C][/ROW]
[ROW][C]CV[/C][C]-23[/C][C]-9[/C][C]-3.5[/C][C]1[/C][C]15[/C][/ROW]
[ROW][C]WH[/C][C]431.328[/C][C]508.049[/C][C]556.303[/C][C]589.7255[/C][C]628.884[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=6929&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=6929&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
Variablelower whiskerlower hingemedianupper hingeupper whisker
$0.85320.96661.18211.23911.3408
RA6691.7110.05192.8255.4
CV-23-9-3.5115
WH431.328508.049556.303589.7255628.884







Boxplot Notches
Variablelower boundmedianupper bound
$1.131359195893361.18211.23284080410664
RA91.2246961644705110.05128.875303835529
CV-5.36204785712458-3.5-1.63795214287542
WH541.094444819756556.303571.511555180244

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
$ & 1.13135919589336 & 1.1821 & 1.23284080410664 \tabularnewline
RA & 91.2246961644705 & 110.05 & 128.875303835529 \tabularnewline
CV & -5.36204785712458 & -3.5 & -1.63795214287542 \tabularnewline
WH & 541.094444819756 & 556.303 & 571.511555180244 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=6929&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]$[/C][C]1.13135919589336[/C][C]1.1821[/C][C]1.23284080410664[/C][/ROW]
[ROW][C]RA[/C][C]91.2246961644705[/C][C]110.05[/C][C]128.875303835529[/C][/ROW]
[ROW][C]CV[/C][C]-5.36204785712458[/C][C]-3.5[/C][C]-1.63795214287542[/C][/ROW]
[ROW][C]WH[/C][C]541.094444819756[/C][C]556.303[/C][C]571.511555180244[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=6929&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=6929&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
Variablelower boundmedianupper bound
$1.131359195893361.18211.23284080410664
RA91.2246961644705110.05128.875303835529
CV-5.36204785712458-3.5-1.63795214287542
WH541.094444819756556.303571.511555180244



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')