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 computationMon, 16 Nov 2009 11:41:39 -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/16/t1258396961hvvcrwzfqo038a3.htm/, Retrieved Fri, 02 Dec 2022 10:37:18 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=57350, Retrieved Fri, 02 Dec 2022 10:37:18 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact201
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
F     [Notched Boxplots] [Ws 6 notched boxp...] [2009-11-13 14:54:10] [62d3ced7fb1c10c35a82e9cb1d0d0e2b]
-    D    [Notched Boxplots] [indexatie notched...] [2009-11-16 18:41:39] [ea241b681aafed79da4b5b99fad98471] [Current]
Feedback Forum

Post a new message
Dataseries X:
100	100	100	100
108,5365854	108,8888889	105,4082715	95,65217391
135,9756098	129,4444444	122,6935313	100
139,0243902	131,6666667	123,8600212	108,6956522
111,5853659	112,7777778	105,8324496	114,4927536
136,5853659	126,6666667	101,8027572	111,5942029
145,7317073	135	122,9056204	94,20289855
129,8780488	119,4444444	115,6945917	88,4057971
140,2439024	130,5555556	124,3902439	92,75362319
130,4878049	123,3333333	116,4369035	98,55072464
129,2682927	116,1111111	119,6182397	102,8985507
127,4390244	123,3333333	117,3913043	105,7971014
109,1463415	108,3333333	106,0445387	104,3478261
126,2195122	117,2222222	120,1484624	101,4492754
135,3658537	122,2222222	129,7985154	101,4492754
120,7317073	106,6666667	119,300106	101,4492754
107,9268293	98,88888889	110,4984093	105,7971014
119,5121951	106,6666667	98,0911983	108,6956522
126,8292683	110,5555556	124,2841994	104,3478261
120,7317073	108,8888889	115,9066808	111,5942029
113,4146341	100,5555556	112,5132556	115,942029
128,0487805	113,3333333	125,980912	114,4927536
113,4146341	100,5555556	111,6648993	115,942029
115,2439024	103,3333333	112,407211	115,942029
105,4878049	97,77777778	108,1654295	114,4927536
121,9512195	107,7777778	119,7242842	114,4927536
121,3414634	107,2222222	123,5418876	127,5362319
118,902439	103,3333333	121,7391304	117,3913043
98,7804878	93,88888889	106,5747614	117,3913043
107,3170732	91,11111111	90,56203606	118,8405797
120,7317073	105,5555556	91,83457052	115,942029
118,2926829	103,8888889	116,542948	120,2898551
104,8780488	95	106,7868505	123,1884058
128,6585366	119,4444444	122,4814422	124,6376812
108,5365854	98,88888889	106,7868505	126,0869565
106,7073171	100,5555556	104,9840933	126,0869565
109,7560976	105,5555556	108,4835631	123,1884058
116,4634146	105	115,3764581	121,7391304
107,9268293	93,33333333	112,3011665	123,1884058
117,0731707	100,5555556	120,0424178	126,0869565
92,07317073	87,22222222	101,4846235	126,0869565
99,3902439	83,88888889	85,79003181	124,6376812
113,4146341	101,6666667	120,7847296	114,4927536
104,8780488	91,66666667	104,0296925	117,3913043
108,5365854	93,88888889	109,0137858	118,8405797
116,4634146	102,2222222	111,028632	123,1884058
101,2195122	91,11111111	101,6967126	124,6376812
97,56097561	87,22222222	100,3181336	123,1884058
101,8292683	93,88888889	107,7412513	120,2898551
106,097561	92,22222222	110,1802757	118,8405797
109,1463415	92,77777778	116,9671262	126,0869565
108,5365854	92,22222222	120,9968187	134,7826087
84,75609756	80	102,6511135	134,7826087
96,95121951	80,55555556	92,68292683	127,5362319
109,1463415	97,22222222	118,1336161	107,2463768
93,90243902	79,44444444	103,2873807	104,3478261
100	85,55555556	109,1198303	108,6956522
109,1463415	95,55555556	119,5121951	120,2898551
93,29268293	81,11111111	102,8632025	127,5362319
89,02439024	78,88888889	100,8483563	128,9855072
90,85365854	82,77777778	102,757158	124,6376812
91,46341463	78,33333333	104,5599152	121,7391304
101,8292683	86,66666667	118,4517497	121,7391304
99,3902439	81,11111111	116,4369035	121,7391304
71,34146341	66,11111111	95,3340403	121,7391304
92,07317073	75	92,68292683	120,2898551
94,51219512	78,88888889	110,8165429	110,1449275
91,46341463	76,11111111	104,0296925	110,1449275
93,90243902	80	108,9077413	114,4927536
97,56097561	85	111,7709438	115,942029
89,63414634	79,44444444	102,8632025	118,8405797
90,24390244	80,55555556	103,2873807	120,2898551




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time0 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 & 0 seconds \tabularnewline
R Server & 'Gwilym Jenkins' @ 72.249.127.135 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=57350&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]0 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=57350&T=0

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







Boxplot statistics
Variablelower whiskerlower hingemedianupper hingeupper whisker
Import71.3414634199.08536585108.5365854120.7317073145.7317073
Export66.1111111186.11111111598.88888889108.05555555135
Industriele_productie85.79003181103.2873807110.3393425118.87592785129.7985154
Werkloosheid88.4057971108.6956522117.3913043123.1884058134.7826087

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
Import & 71.34146341 & 99.08536585 & 108.5365854 & 120.7317073 & 145.7317073 \tabularnewline
Export & 66.11111111 & 86.111111115 & 98.88888889 & 108.05555555 & 135 \tabularnewline
Industriele_productie & 85.79003181 & 103.2873807 & 110.3393425 & 118.87592785 & 129.7985154 \tabularnewline
Werkloosheid & 88.4057971 & 108.6956522 & 117.3913043 & 123.1884058 & 134.7826087 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=57350&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]Import[/C][C]71.34146341[/C][C]99.08536585[/C][C]108.5365854[/C][C]120.7317073[/C][C]145.7317073[/C][/ROW]
[ROW][C]Export[/C][C]66.11111111[/C][C]86.111111115[/C][C]98.88888889[/C][C]108.05555555[/C][C]135[/C][/ROW]
[ROW][C]Industriele_productie[/C][C]85.79003181[/C][C]103.2873807[/C][C]110.3393425[/C][C]118.87592785[/C][C]129.7985154[/C][/ROW]
[ROW][C]Werkloosheid[/C][C]88.4057971[/C][C]108.6956522[/C][C]117.3913043[/C][C]123.1884058[/C][C]134.7826087[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=57350&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=57350&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
Import71.3414634199.08536585108.5365854120.7317073145.7317073
Export66.1111111186.11111111598.88888889108.05555555135
Industriele_productie85.79003181103.2873807110.3393425118.87592785129.7985154
Werkloosheid88.4057971108.6956522117.3913043123.1884058134.7826087







Boxplot Notches
Variablelower boundmedianupper bound
Import104.505933028844108.5365854112.567237771156
Export94.80272831640298.88888889102.975049463598
Industriele_productie107.436680418366110.3393425113.242004581634
Werkloosheid114.692684221529117.3913043120.089924378471

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
Import & 104.505933028844 & 108.5365854 & 112.567237771156 \tabularnewline
Export & 94.802728316402 & 98.88888889 & 102.975049463598 \tabularnewline
Industriele_productie & 107.436680418366 & 110.3393425 & 113.242004581634 \tabularnewline
Werkloosheid & 114.692684221529 & 117.3913043 & 120.089924378471 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=57350&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]Import[/C][C]104.505933028844[/C][C]108.5365854[/C][C]112.567237771156[/C][/ROW]
[ROW][C]Export[/C][C]94.802728316402[/C][C]98.88888889[/C][C]102.975049463598[/C][/ROW]
[ROW][C]Industriele_productie[/C][C]107.436680418366[/C][C]110.3393425[/C][C]113.242004581634[/C][/ROW]
[ROW][C]Werkloosheid[/C][C]114.692684221529[/C][C]117.3913043[/C][C]120.089924378471[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=57350&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=57350&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
Import104.505933028844108.5365854112.567237771156
Export94.80272831640298.88888889102.975049463598
Industriele_productie107.436680418366110.3393425113.242004581634
Werkloosheid114.692684221529117.3913043120.089924378471



Parameters (Session):
par1 = blue ;
Parameters (R input):
par1 = blue ;
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')