FreeStatistics.org

Free Statistics

of Irreproducible Research!

Description of Statistical Computation

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, 09 Dec 2015 14:50:47 +0000
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2015/Dec/09/t1449672671dyjp7dmkup3n9pf.htm/, Retrieved Thu, 16 May 2024 07:56:58 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=285720, Retrieved Thu, 16 May 2024 07:56:58 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact65

Tree of Dependent Computations

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Notched Boxplots] [Notched boxplot f...] [2015-12-09 14:50:47] [aadc6450758f731b301ef0a868304387] [Current]
Feedback Forum

Post a new message

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
1384 428 525 755 504 1162 242 708 724 88 285
1470 469 568 760 427 1253 273 743 722 142 267
1683 501 598 769 470 1211 248 714 658 91 279
1679 459 679 919 432 1248 291 740 722 108 316
1748 514 636 934 497 1291 325 794 792 128 276
1604 493 701 877 479 1388 362 732 796 138 308
1437 507 628 804 517 1501 276 717 773 136 320
1592 438 643 867 454 1485 280 796 714 111 300
1581 526 720 941 505 1813 324 887 761 115 303
1854 626 859 1042 602 1788 348 977 862 127 335
1898 543 769 1042 666 1915 346 993 886 139 373
1815 564 782 1005 742 2348 356 1102 929 159 422
1991 647 843 1148 727 2263 408 1066 967 144 383
2112 640 954 1219 817 2652 455 1160 1136 196 399
2010 602 942 991 740 2203 407 1159 1068 171 443
1442 479 618 781 623 1838 321 852 760 140 337

Tables (Output of Computation)





Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time1 seconds
R Server'Sir Ronald Aylmer Fisher' @ fisher.wessa.net

\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 & 'Sir Ronald Aylmer Fisher' @ fisher.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=285720&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]'Sir Ronald Aylmer Fisher' @ fisher.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=285720&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=285720&T=0

As an alternative you can also use a QR Code:  
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'Sir Ronald Aylmer Fisher' @ fisher.wessa.net






Boxplot statistics
Variablelower whiskerlower hingemedianupper hingeupper whisker
ANT13841525.5168118762112
VB428474510.5583647
WV525623690812.5954
OV755792.5926.51023.51219
LIM427474.5511696.5817
BHG116212721644.520592652
WB242278324.5359455
HEN7087368241029.51160
LUIK658723782.5907.51136
LUX88113137143171
NAMEN267292.5318378443

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
ANT & 1384 & 1525.5 & 1681 & 1876 & 2112 \tabularnewline
VB & 428 & 474 & 510.5 & 583 & 647 \tabularnewline
WV & 525 & 623 & 690 & 812.5 & 954 \tabularnewline
OV & 755 & 792.5 & 926.5 & 1023.5 & 1219 \tabularnewline
LIM & 427 & 474.5 & 511 & 696.5 & 817 \tabularnewline
BHG & 1162 & 1272 & 1644.5 & 2059 & 2652 \tabularnewline
WB & 242 & 278 & 324.5 & 359 & 455 \tabularnewline
HEN & 708 & 736 & 824 & 1029.5 & 1160 \tabularnewline
LUIK & 658 & 723 & 782.5 & 907.5 & 1136 \tabularnewline
LUX & 88 & 113 & 137 & 143 & 171 \tabularnewline
NAMEN & 267 & 292.5 & 318 & 378 & 443 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=285720&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]ANT[/C][C]1384[/C][C]1525.5[/C][C]1681[/C][C]1876[/C][C]2112[/C][/ROW]
[ROW][C]VB[/C][C]428[/C][C]474[/C][C]510.5[/C][C]583[/C][C]647[/C][/ROW]
[ROW][C]WV[/C][C]525[/C][C]623[/C][C]690[/C][C]812.5[/C][C]954[/C][/ROW]
[ROW][C]OV[/C][C]755[/C][C]792.5[/C][C]926.5[/C][C]1023.5[/C][C]1219[/C][/ROW]
[ROW][C]LIM[/C][C]427[/C][C]474.5[/C][C]511[/C][C]696.5[/C][C]817[/C][/ROW]
[ROW][C]BHG[/C][C]1162[/C][C]1272[/C][C]1644.5[/C][C]2059[/C][C]2652[/C][/ROW]
[ROW][C]WB[/C][C]242[/C][C]278[/C][C]324.5[/C][C]359[/C][C]455[/C][/ROW]
[ROW][C]HEN[/C][C]708[/C][C]736[/C][C]824[/C][C]1029.5[/C][C]1160[/C][/ROW]
[ROW][C]LUIK[/C][C]658[/C][C]723[/C][C]782.5[/C][C]907.5[/C][C]1136[/C][/ROW]
[ROW][C]LUX[/C][C]88[/C][C]113[/C][C]137[/C][C]143[/C][C]171[/C][/ROW]
[ROW][C]NAMEN[/C][C]267[/C][C]292.5[/C][C]318[/C][C]378[/C][C]443[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=285720&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=285720&T=1

As an alternative you can also use a QR Code:  
QR Code


The GUIDs for individual cells are displayed in the table below:

Boxplot statistics
Variablelower whiskerlower hingemedianupper hingeupper whisker
ANT13841525.5168118762112
VB428474510.5583647
WV525623690812.5954
OV755792.5926.51023.51219
LIM427474.5511696.5817
BHG116212721644.520592652
WB242278324.5359455
HEN7087368241029.51160
LUIK658723782.5907.51136
LUX88113137143171
NAMEN267292.5318378443






Boxplot Notches
Variablelower boundmedianupper bound
ANT1542.552516811819.4475
VB467.445510.5553.555
WV615.1475690764.8525
OV835.255926.51017.745
LIM423.31511598.69
BHG1333.6351644.51955.365
WB292.505324.5356.495
HEN708.0675824939.9325
LUIK709.6225782.5855.3775
LUX125.15137148.85
NAMEN284.2275318351.7725

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
ANT & 1542.5525 & 1681 & 1819.4475 \tabularnewline
VB & 467.445 & 510.5 & 553.555 \tabularnewline
WV & 615.1475 & 690 & 764.8525 \tabularnewline
OV & 835.255 & 926.5 & 1017.745 \tabularnewline
LIM & 423.31 & 511 & 598.69 \tabularnewline
BHG & 1333.635 & 1644.5 & 1955.365 \tabularnewline
WB & 292.505 & 324.5 & 356.495 \tabularnewline
HEN & 708.0675 & 824 & 939.9325 \tabularnewline
LUIK & 709.6225 & 782.5 & 855.3775 \tabularnewline
LUX & 125.15 & 137 & 148.85 \tabularnewline
NAMEN & 284.2275 & 318 & 351.7725 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=285720&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]ANT[/C][C]1542.5525[/C][C]1681[/C][C]1819.4475[/C][/ROW]
[ROW][C]VB[/C][C]467.445[/C][C]510.5[/C][C]553.555[/C][/ROW]
[ROW][C]WV[/C][C]615.1475[/C][C]690[/C][C]764.8525[/C][/ROW]
[ROW][C]OV[/C][C]835.255[/C][C]926.5[/C][C]1017.745[/C][/ROW]
[ROW][C]LIM[/C][C]423.31[/C][C]511[/C][C]598.69[/C][/ROW]
[ROW][C]BHG[/C][C]1333.635[/C][C]1644.5[/C][C]1955.365[/C][/ROW]
[ROW][C]WB[/C][C]292.505[/C][C]324.5[/C][C]356.495[/C][/ROW]
[ROW][C]HEN[/C][C]708.0675[/C][C]824[/C][C]939.9325[/C][/ROW]
[ROW][C]LUIK[/C][C]709.6225[/C][C]782.5[/C][C]855.3775[/C][/ROW]
[ROW][C]LUX[/C][C]125.15[/C][C]137[/C][C]148.85[/C][/ROW]
[ROW][C]NAMEN[/C][C]284.2275[/C][C]318[/C][C]351.7725[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=285720&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=285720&T=2

As an alternative you can also use a QR Code:  
QR Code


The GUIDs for individual cells are displayed in the table below:

Boxplot Notches
Variablelower boundmedianupper bound
ANT1542.552516811819.4475
VB467.445510.5553.555
WV615.1475690764.8525
OV835.255926.51017.745
LIM423.31511598.69
BHG1333.6351644.51955.365
WB292.505324.5356.495
HEN708.0675824939.9325
LUIK709.6225782.5855.3775
LUX125.15137148.85
NAMEN284.2275318351.7725


Figures (Output of Computation)

Input Parameters & R Code

Parameters (Session):
par1 = grey ;
Parameters (R input):
par1 = grey ;
R code (references can be found in the software module):
z <- na.omit(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')