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 computationThu, 12 Nov 2009 09:43:09 -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/12/t1258044300cfal9uczuiku5pk.htm/, Retrieved Fri, 03 May 2024 19:19:21 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=56217, Retrieved Fri, 03 May 2024 19:19:21 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywordsWs6notchedboxplots
Estimated Impact140
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]
-    D    [Notched Boxplots] [] [2009-11-12 16:43:09] [d41d8cd98f00b204e9800998ecf8427e] [Current]
Feedback Forum

Post a new message
Dataseries X:
100,00	100,00	100,00	100,00
99,80	93,54	98,19	106,88
108,48	110,15	111,50	119,65
104,62	107,83	100,13	114,20
104,42	100,91	103,31	120,90
105,93	98,93	103,15	119,85
100,78	97,09	97,53	119,21
93,79	96,17	92,94	111,64
108,90	100,38	109,73	116,26
112,54	111,75	109,52	127,51
105,96	104,22	105,90	122,40
104,64	94,75	101,79	112,82
102,88	108,05	106,03	114,37
103,99	101,59	104,46	110,86
113,18	108,50	113,29	119,31
102,73	100,44	98,96	114,98
100,34	98,46	98,00	120,29
101,65	92,69	99,75	111,69
103,57	95,10	97,55	115,25
90,15	91,84	86,85	107,84
105,22	105,45	108,29	131,20
113,31	113,78	113,14	133,01
106,26	105,57	105,86	120,12
109,33	108,45	102,26	125,77
100,27	104,13	102,97	108,62
102,98	105,75	101,70	117,83
120,01	123,59	119,62	139,74
106,87	112,81	106,36	127,02
107,83	106,06	108,33	104,77
124,22	110,57	120,33	128,10
112,58	107,79	111,68	119,72
106,51	112,76	105,13	112,75
123,63	114,25	127,64	122,67
121,00	121,63	125,06	122,53
124,90	124,17	126,33	125,52
125,56	120,85	121,09	126,28
113,24	111,37	117,06	107,96
114,91	109,08	117,37	111,10
130,39	121,77	132,52	130,34
124,95	117,97	124,47	131,79
117,34	114,68	117,27	135,00
125,62	125,03	126,56	138,71
115,85	127,69	117,11	133,70
112,42	135,66	117,50	136,23
130,22	139,17	136,74	145,22
127,91	141,50	134,90	139,15
132,14	146,51	139,80	146,48
132,10	140,94	133,50	143,97
129,99	145,58	137,03	131,81
129,29	129,10	133,72	138,03
153,11	151,80	157,90	165,09
135,42	134,03	132,11	148,71
148,19	141,96	138,75	162,59
144,97	144,58	142,57	168,41
136,11	137,83	127,31	152,12
133,22	146,95	133,75	155,17
143,11	147,57	146,04	162,56
149,22	160,25	151,37	161,75
150,58	157,21	156,68	168,31
140,48	143,81	142,48	161,78
143,36	151,64	148,66	151,17
145,14	139,68	143,86	152,12
164,47	152,00	162,23	186,83
146,52	144,75	141,08	161,83
157,00	155,19	148,50	175,46
159,07	148,77	151,55	187,40
149,54	152,30	145,91	172,96
148,08	151,23	143,60	175,53
153,53	151,87	154,90	176,86
167,51	165,59	169,42	190,10
169,99	169,09	174,89	195,36
149,81	153,23	151,50	173,96




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=56217&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=56217&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=56217&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
InvwEU90.15105.945120.505141.795169.99
InvwnietEU91.84105.66119.41144.665169.09
UitvwEU86.85105.495119.975140.44174.89
UitvwnietEU100118.52130.77153.645195.36

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
InvwEU & 90.15 & 105.945 & 120.505 & 141.795 & 169.99 \tabularnewline
InvwnietEU & 91.84 & 105.66 & 119.41 & 144.665 & 169.09 \tabularnewline
UitvwEU & 86.85 & 105.495 & 119.975 & 140.44 & 174.89 \tabularnewline
UitvwnietEU & 100 & 118.52 & 130.77 & 153.645 & 195.36 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=56217&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]InvwEU[/C][C]90.15[/C][C]105.945[/C][C]120.505[/C][C]141.795[/C][C]169.99[/C][/ROW]
[ROW][C]InvwnietEU[/C][C]91.84[/C][C]105.66[/C][C]119.41[/C][C]144.665[/C][C]169.09[/C][/ROW]
[ROW][C]UitvwEU[/C][C]86.85[/C][C]105.495[/C][C]119.975[/C][C]140.44[/C][C]174.89[/C][/ROW]
[ROW][C]UitvwnietEU[/C][C]100[/C][C]118.52[/C][C]130.77[/C][C]153.645[/C][C]195.36[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=56217&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=56217&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
InvwEU90.15105.945120.505141.795169.99
InvwnietEU91.84105.66119.41144.665169.09
UitvwEU86.85105.495119.975140.44174.89
UitvwnietEU100118.52130.77153.645195.36







Boxplot Notches
Variablelower boundmedianupper bound
InvwEU113.829558432208120.505127.180441567792
InvwnietEU112.147082333286119.41126.672917666714
UitvwEU113.468073763278119.975126.481926236722
UitvwnietEU124.22955690185130.77137.31044309815

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
InvwEU & 113.829558432208 & 120.505 & 127.180441567792 \tabularnewline
InvwnietEU & 112.147082333286 & 119.41 & 126.672917666714 \tabularnewline
UitvwEU & 113.468073763278 & 119.975 & 126.481926236722 \tabularnewline
UitvwnietEU & 124.22955690185 & 130.77 & 137.31044309815 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=56217&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]InvwEU[/C][C]113.829558432208[/C][C]120.505[/C][C]127.180441567792[/C][/ROW]
[ROW][C]InvwnietEU[/C][C]112.147082333286[/C][C]119.41[/C][C]126.672917666714[/C][/ROW]
[ROW][C]UitvwEU[/C][C]113.468073763278[/C][C]119.975[/C][C]126.481926236722[/C][/ROW]
[ROW][C]UitvwnietEU[/C][C]124.22955690185[/C][C]130.77[/C][C]137.31044309815[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=56217&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=56217&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
InvwEU113.829558432208120.505127.180441567792
InvwnietEU112.147082333286119.41126.672917666714
UitvwEU113.468073763278119.975126.481926236722
UitvwnietEU124.22955690185130.77137.31044309815



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