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 computationFri, 13 Nov 2009 03:23:04 -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/13/t1258107825ygsfhk56qivmo6n.htm/, Retrieved Sun, 05 May 2024 13:56:00 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=56452, Retrieved Sun, 05 May 2024 13:56:00 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact183
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Kendall tau Correlation Matrix] [3/11/2009] [2009-11-02 21:25:00] [b98453cac15ba1066b407e146608df68]
-    D  [Kendall tau Correlation Matrix] [] [2009-11-11 20:56:31] [4f76e114ed5e444b1133aad392380aad]
- RM D      [Notched Boxplots] [ws 6 2] [2009-11-13 10:23:04] [84778c3520b84fd5786bccf2e25a5aef] [Current]
Feedback Forum

Post a new message
Dataseries X:
1.01	0.99	0.97	1.42
1.02	1.01	0.94	1.42
1.03	1.02	0.89	1.42
1.04	1.04	0.87	1.42
1.05	1.04	0.86	1.43
1.06	1.05	0.91	1.43
1.07	1.04	0.88	1.43
1.09	1.06	0.83	1.44
1.10	1.11	0.79	1.44
1.13	1.14	0.80	1.44
1.14	1.14	0.80	1.45
1.15	1.12	0.76	1.45
1.17	1.10	0.80	1.45
1.18	1.10	0.85	1.45
1.19	1.21	0.83	1.45
1.21	1.21	0.82	1.46
1.22	1.18	0.86	1.46
1.24	1.18	0.91	1.46
1.25	1.15	0.98	1.47
1.26	1.18	0.99	1.47
1.28	1.24	0.99	1.47
1.30	1.28	1.00	1.48
1.31	1.23	0.97	1.48
1.32	1.21	0.94	1.48
1.34	1.19	0.95	1.48
1.34	1.18	0.93	1.49
1.35	1.19	0.95	1.49
1.37	1.18	1.00	1.49
1.37	1.18	1.01	1.49
1.38	1.20	0.99	1.49
1.39	1.23	1.05	1.49
1.40	1.25	1.08	1.49
1.42	1.29	1.15	1.50
1.43	1.31	1.14	1.50
1.39	1.22	1.10	1.50
1.41	1.17	1.09	1.50
1.42	1.17	1.09	1.50
1.44	1.10	1.06	1.51
1.45	1.17	1.09	1.51
1.46	1.15	1.05	1.51
1.47	1.18	1.03	1.51
1.48	1.17	1.02	1.52
1.49	1.18	1.09	1.53
1.51	1.19	1.12	1.54
1.52	1.24	1.20	1.55
1.32	1.22	1.20	1.55
1.33	1.16	1.13	1.55
1.34	1.14	1.13	1.55
1.36	1.15	1.10	1.56
1.21	1.13	1.04	1.56
1.18	1.16	0.95	1.57
1.11	1.10	1.00	1.57
1.05	1.19	1.00	1.57
1.05	1.21	0.99	1.57
1.06	1.24	0.97	1.57
0.95	1.26	0.97	1.57
0.96	1.35	1.00	1.58
0.98	1.34	0.94	1.58
0.99	1.29	0.90	1.59
1.00	1.30	0.89	1.59




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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=56452&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
leningbgez0.951.081.2551.3851.52
saldozichtrek1.011.1351.181.221.34
rentevoet0.760.8950.9851.0551.2
buurloon1.421.4551.491.551.59

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
leningbgez & 0.95 & 1.08 & 1.255 & 1.385 & 1.52 \tabularnewline
saldozichtrek & 1.01 & 1.135 & 1.18 & 1.22 & 1.34 \tabularnewline
rentevoet & 0.76 & 0.895 & 0.985 & 1.055 & 1.2 \tabularnewline
buurloon & 1.42 & 1.455 & 1.49 & 1.55 & 1.59 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=56452&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]leningbgez[/C][C]0.95[/C][C]1.08[/C][C]1.255[/C][C]1.385[/C][C]1.52[/C][/ROW]
[ROW][C]saldozichtrek[/C][C]1.01[/C][C]1.135[/C][C]1.18[/C][C]1.22[/C][C]1.34[/C][/ROW]
[ROW][C]rentevoet[/C][C]0.76[/C][C]0.895[/C][C]0.985[/C][C]1.055[/C][C]1.2[/C][/ROW]
[ROW][C]buurloon[/C][C]1.42[/C][C]1.455[/C][C]1.49[/C][C]1.55[/C][C]1.59[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=56452&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=56452&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
leningbgez0.951.081.2551.3851.52
saldozichtrek1.011.1351.181.221.34
rentevoet0.760.8950.9851.0551.2
buurloon1.421.4551.491.551.59







Boxplot Notches
Variablelower boundmedianupper bound
leningbgez1.192786977515421.2551.31721302248458
saldozichtrek1.162661944553481.181.19733805544652
rentevoet0.9523636603359590.9851.01763633966404
buurloon1.470622173324481.491.50937782667552

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
leningbgez & 1.19278697751542 & 1.255 & 1.31721302248458 \tabularnewline
saldozichtrek & 1.16266194455348 & 1.18 & 1.19733805544652 \tabularnewline
rentevoet & 0.952363660335959 & 0.985 & 1.01763633966404 \tabularnewline
buurloon & 1.47062217332448 & 1.49 & 1.50937782667552 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=56452&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]leningbgez[/C][C]1.19278697751542[/C][C]1.255[/C][C]1.31721302248458[/C][/ROW]
[ROW][C]saldozichtrek[/C][C]1.16266194455348[/C][C]1.18[/C][C]1.19733805544652[/C][/ROW]
[ROW][C]rentevoet[/C][C]0.952363660335959[/C][C]0.985[/C][C]1.01763633966404[/C][/ROW]
[ROW][C]buurloon[/C][C]1.47062217332448[/C][C]1.49[/C][C]1.50937782667552[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=56452&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=56452&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
leningbgez1.192786977515421.2551.31721302248458
saldozichtrek1.162661944553481.181.19733805544652
rentevoet0.9523636603359590.9851.01763633966404
buurloon1.470622173324481.491.50937782667552



Parameters (Session):
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')