Free Statistics

of Irreproducible Research!

Author's title

Author*The author of this computation has been verified*
R Software Modulerwasp_notchedbox1.wasp
Title produced by softwareNotched Boxplots
Date of computationWed, 11 Nov 2009 05:31:57 -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/2009/Nov/11/t1257942778512hry2g5fn7irn.htm/, Retrieved Fri, 26 Apr 2024 13:25:40 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=55533, Retrieved Fri, 26 Apr 2024 13:25:40 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywordsshwws6vr1
Estimated Impact156
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Notched Boxplots] [3/11/2009] [2009-11-02 21:10:41] [b98453cac15ba1066b407e146608df68]
- R  D    [Notched Boxplots] [] [2009-11-11 12:31:57] [4407d6264e55b051ec65750e6dca2820] [Current]
Feedback Forum

Post a new message
Dataseries X:
100	100	100	100
87,14054095	99,31916948	84,48959366	85,95702149
112,0054296	114,7106298	96,92765114	68,015992
112,312101	114,9941367	98,26560951	91,25437281
109,474134	114,6085397	107,5569871	104,2978511
104,9746116	116,3633855	103,64222	71,11444278
100,4926851	108,0492516	93,45887017	94,35282359
104,2154743	112,8502449	105,2527255	71,91404298
120,1768388	127,2518452	126,1397423	74,8125937
112,1028355	116,4999655	112,4132805	98,4007996
108,1481575	113,8511416	107,9286422	115,6921539
116,802197	126,3771815	100,7928642	109,5452274
102,1699512	103,8290681	106,1199207	110,2948526
95,15358705	108,296889	103,666997	122,0389805
120,6707808	125,0969166	142,888999	91,2043978
111,5234277	115,6701386	120,6144698	114,8425787
119,9669448	130,2545354	104,8067393	118,9905047
113,3697401	131,2064565	121,7294351	103,1984008
110,0717661	124,8665241	121,1100099	124,5877061
111,5567342	122,6191626	129,4846383	90,85457271
132,424212	148,2368766	103,691774	108,9455272
107,900558	117,7160792	116,7740337	123,1384308
122,1626615	128,9232255	105,2031715	107,0964518
124,3992258	130,7380837	122,8444004	121,0894553
110,4450505	113,1192661	121,283449	110,2948526
101,5874013	116,5454922	114,147671	102,1989005
122,3203962	127,9782024	127,4281467	90,30484758
125,2582826	132,9240533	124,6778989	116,4417791
125,4411543	133,9732358	139,147671	118,1909045
108,9902468	121,2623301	154,5094153	119,6401799
118,9243879	128,559702	124,6531219	104,2978511
116,7242723	124,692695	167,1456888	104,4477761
134,1724901	140,9850314	121,6551041	123,5382309
116,8530994	124,6823481	130,4013875	142,0789605
124,5732995	134,9451611	124,2814668	122,8385807
130,9914031	137,2642616	131,0951437	124,4877561
123,4239103	132,6308891	134,2666006	125,6371814
111,4536725	122,7122853	166,3032706	125,5372314
124,5135991	132,5846727	166,8483647	103,5482259
139,2589613	151,5410085	151,2140733	114,0929535
129,8596099	145,764641	154,8562934	127,0864568
112,3460359	134,4043595	139,444995	108,8955522
131,381655	152,9192247	140,8572844	122,1389305
133,0004776	143,9387459	171,308226	116,5417291
134,3220552	152,9709595	133,3994054	106,2468766
144,2379719	162,3356557	131,8384539	119,6901549
134,1278719	148,1658274	147,4231913	167,6661669
150,1891559	167,9499207	158,8453915	124,3378311
140,722563	156,9400566	159,0436075	132,2338831
114,8389975	140,2241843	163,2309217	137,6311844
143,1973003	163,13996	187,9335976	90,30484758
140,2738676	160,969166	195,4410307	127,986007
112,1248303	135,3031662	234,4152626	123,6381809
102,8951536	124,4554046	161,1992071	113,8430785
100,5090242	119,2143202	162,7106046	123,988006
103,3513901	116,21163	192,2943508	76,8115942
111,4134533	125,2638477	151,6352825	112,6936532
104,5887587	114,0987791	134,8116947	137,1314343
101,7840983	110,0413879	112,9088206	200,049975
114,7007441	126,6317169	105,0297324	150,8245877
108,7426474	113,0875354	122,0267592	172,5137431




Summary of computational 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 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=55533&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=55533&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=55533&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 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
Totuit87.14054095108.7426474114.7007441125.2582826144.2379719
Totin99.31916948116.21163126.3771815135.3031662163.13996
Invchin84.48959366107.9286422126.1397423151.6352825195.4410307
Uitvchin74.8125937103.1984008114.8425787123.988006150.8245877

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
Totuit & 87.14054095 & 108.7426474 & 114.7007441 & 125.2582826 & 144.2379719 \tabularnewline
Totin & 99.31916948 & 116.21163 & 126.3771815 & 135.3031662 & 163.13996 \tabularnewline
Invchin & 84.48959366 & 107.9286422 & 126.1397423 & 151.6352825 & 195.4410307 \tabularnewline
Uitvchin & 74.8125937 & 103.1984008 & 114.8425787 & 123.988006 & 150.8245877 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=55533&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]Totuit[/C][C]87.14054095[/C][C]108.7426474[/C][C]114.7007441[/C][C]125.2582826[/C][C]144.2379719[/C][/ROW]
[ROW][C]Totin[/C][C]99.31916948[/C][C]116.21163[/C][C]126.3771815[/C][C]135.3031662[/C][C]163.13996[/C][/ROW]
[ROW][C]Invchin[/C][C]84.48959366[/C][C]107.9286422[/C][C]126.1397423[/C][C]151.6352825[/C][C]195.4410307[/C][/ROW]
[ROW][C]Uitvchin[/C][C]74.8125937[/C][C]103.1984008[/C][C]114.8425787[/C][C]123.988006[/C][C]150.8245877[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=55533&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=55533&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
Totuit87.14054095108.7426474114.7007441125.2582826144.2379719
Totin99.31916948116.21163126.3771815135.3031662163.13996
Invchin84.48959366107.9286422126.1397423151.6352825195.4410307
Uitvchin74.8125937103.1984008114.8425787123.988006150.8245877







Boxplot Notches
Variablelower boundmedianupper bound
Totuit111.359659666234114.7007441118.041828533766
Totin122.514996749485126.3771815130.239366250515
Invchin117.297964566949126.1397423134.981520033051
Uitvchin110.636877527945114.8425787119.048279872055

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
Totuit & 111.359659666234 & 114.7007441 & 118.041828533766 \tabularnewline
Totin & 122.514996749485 & 126.3771815 & 130.239366250515 \tabularnewline
Invchin & 117.297964566949 & 126.1397423 & 134.981520033051 \tabularnewline
Uitvchin & 110.636877527945 & 114.8425787 & 119.048279872055 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=55533&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]Totuit[/C][C]111.359659666234[/C][C]114.7007441[/C][C]118.041828533766[/C][/ROW]
[ROW][C]Totin[/C][C]122.514996749485[/C][C]126.3771815[/C][C]130.239366250515[/C][/ROW]
[ROW][C]Invchin[/C][C]117.297964566949[/C][C]126.1397423[/C][C]134.981520033051[/C][/ROW]
[ROW][C]Uitvchin[/C][C]110.636877527945[/C][C]114.8425787[/C][C]119.048279872055[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=55533&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=55533&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
Totuit111.359659666234114.7007441118.041828533766
Totin122.514996749485126.3771815130.239366250515
Invchin117.297964566949126.1397423134.981520033051
Uitvchin110.636877527945114.8425787119.048279872055



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