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, 26 Nov 2015 10:01:03 +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/Nov/26/t1448532174wakc84ugapqhlfl.htm/, Retrieved Tue, 14 May 2024 21:32:54 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=284177, Retrieved Tue, 14 May 2024 21:32:54 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact113
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Notched Boxplots] [Notched boxplot +...] [2015-11-26 10:01:03] [f98cce6af86ed77fb0e6a603daf8b07f] [Current]
Feedback Forum

Post a new message
Dataseries X:
63966 55954 161193 156209 62065 64281
60410 52044 157645 152539 61943 64023
59440 49975 161694 153769 62361 63935
59445 50398 163411 155094 62919 64387
57614 48751 161834 152729 62881 64161
55396 46908 159511 151606 62892 64011
53030 44938 156359 149974 62591 63685
50090 42372 154223 147955 62417 63522
48764 43522 151497 149158 62172 63541
61658 58434 160607 163391 63113 65070
63943 62713 159672 166540 63077 65357
64878 59266 155601 156816 62438 64281
60634 53411 154668 152363 62384 64152
57905 50215 153960 150083 62506 64043
57224 48474 157307 150829 62935 63966
60953 50250 165218 155755 64433 65040
60621 49409 165616 153866 64533 64640
57258 46751 162212 151148 64184 64179
54903 44869 159787 149249 63911 63633
53278 43023 157454 146921 63673 63327
53042 44638 156485 149763 63290 63237
63753 57810 165887 164849 64652 64793
69210 65000 166836 168530 64516 64622
71446 61665 163541 159513 63995 63615
68408 56119 163973 155122 64536 63319
65427 52162 164805 152847 64776 63261
64630 51069 167521 153809 65144 62699
66086 51744 174347 158166 65238 61956
65058 50816 173374 155661 65421 62069
62689 48578 172198 153965 65821 62179
60841 47144 171055 152954 66298 62327
57346 44839 168385 151608 66523 62526
56222 45879 167281 153817 67143 63055
68202 60730 177670 170179 68835 65277
70745 65037 177280 173839 68984 65783
73690 63281 174846 166808 69170 65353
68992 57300 174476 162583 69844 65583
65925 53335 174595 160290 70528 65950
65546 51813 178392 161538 71979 66634
67221 52597 185345 165579 73608 67836
65315 50744 183293 162893 73508 67700
62038 48008 181081 160799 73973 67463
58774 45326 177795 158734 73899 67412
55320 42661 173552 155668 73566 67308
53900 43627 170734 157466 73859 67881
65544 58156 179293 171491 75287 69652
67906 61772 178659 173947 75308 69733
70911 59879 175894 166698 74871 68891
66544 54417 174815 162173 75337 68994
63657 50575 173506 158608 75449 69021
61720 48798 175376 158635 76211 69072
62140 48819 179372 160630 79371 70283
60837 47606 177688 158579 80224 70795
58632 45345 175480 155376 81014 71111
54642 42484 169705 150347 80253 70274
51125 39735 164951 147207 79169 69220
51000 40959 163405 149905 79214 69841
60486 53249 169431 161333 79783 71275
62685 57028 168389 163547 79523 71295
66142 55763 164009 155522 77265 69073
61895 50547 162245 151682 76986 68752




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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=284177&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' @ jenkins.wessa.net







Boxplot statistics
Variablelower whiskerlower hingemedianupper hingeupper whisker
WLH_-25_M4876457346617206554473690
WLH_-25_V3973546751505475595465037
WLH_2550_M151497161694167281174815185345
WLH_2550_V146921152363155668161538173947
WLH_50__M6194363290662987487181014
WLH_50__V6195663685650406875271295

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
WLH_-25_M & 48764 & 57346 & 61720 & 65544 & 73690 \tabularnewline
WLH_-25_V & 39735 & 46751 & 50547 & 55954 & 65037 \tabularnewline
WLH_2550_M & 151497 & 161694 & 167281 & 174815 & 185345 \tabularnewline
WLH_2550_V & 146921 & 152363 & 155668 & 161538 & 173947 \tabularnewline
WLH_50__M & 61943 & 63290 & 66298 & 74871 & 81014 \tabularnewline
WLH_50__V & 61956 & 63685 & 65040 & 68752 & 71295 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=284177&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]WLH_-25_M[/C][C]48764[/C][C]57346[/C][C]61720[/C][C]65544[/C][C]73690[/C][/ROW]
[ROW][C]WLH_-25_V[/C][C]39735[/C][C]46751[/C][C]50547[/C][C]55954[/C][C]65037[/C][/ROW]
[ROW][C]WLH_2550_M[/C][C]151497[/C][C]161694[/C][C]167281[/C][C]174815[/C][C]185345[/C][/ROW]
[ROW][C]WLH_2550_V[/C][C]146921[/C][C]152363[/C][C]155668[/C][C]161538[/C][C]173947[/C][/ROW]
[ROW][C]WLH_50__M[/C][C]61943[/C][C]63290[/C][C]66298[/C][C]74871[/C][C]81014[/C][/ROW]
[ROW][C]WLH_50__V[/C][C]61956[/C][C]63685[/C][C]65040[/C][C]68752[/C][C]71295[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=284177&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=284177&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
WLH_-25_M4876457346617206554473690
WLH_-25_V3973546751505475595465037
WLH_2550_M151497161694167281174815185345
WLH_2550_V146921152363155668161538173947
WLH_50__M6194363290662987487181014
WLH_50__V6195663685650406875271295







Boxplot Notches
Variablelower boundmedianupper bound
WLH_-25_M60061.558780136172063378.44121987
WLH_-25_V48685.24901848455054752408.7509815155
WLH_2550_M164626.644395473167281169935.355604527
WLH_2550_V153811.913370053155668157524.086629947
WLH_50__M63955.18373172556629868640.8162682745
WLH_50__V64014.95466442046504066065.0453355796

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
WLH_-25_M & 60061.55878013 & 61720 & 63378.44121987 \tabularnewline
WLH_-25_V & 48685.2490184845 & 50547 & 52408.7509815155 \tabularnewline
WLH_2550_M & 164626.644395473 & 167281 & 169935.355604527 \tabularnewline
WLH_2550_V & 153811.913370053 & 155668 & 157524.086629947 \tabularnewline
WLH_50__M & 63955.1837317255 & 66298 & 68640.8162682745 \tabularnewline
WLH_50__V & 64014.9546644204 & 65040 & 66065.0453355796 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=284177&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]WLH_-25_M[/C][C]60061.55878013[/C][C]61720[/C][C]63378.44121987[/C][/ROW]
[ROW][C]WLH_-25_V[/C][C]48685.2490184845[/C][C]50547[/C][C]52408.7509815155[/C][/ROW]
[ROW][C]WLH_2550_M[/C][C]164626.644395473[/C][C]167281[/C][C]169935.355604527[/C][/ROW]
[ROW][C]WLH_2550_V[/C][C]153811.913370053[/C][C]155668[/C][C]157524.086629947[/C][/ROW]
[ROW][C]WLH_50__M[/C][C]63955.1837317255[/C][C]66298[/C][C]68640.8162682745[/C][/ROW]
[ROW][C]WLH_50__V[/C][C]64014.9546644204[/C][C]65040[/C][C]66065.0453355796[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=284177&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=284177&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
WLH_-25_M60061.558780136172063378.44121987
WLH_-25_V48685.24901848455054752408.7509815155
WLH_2550_M164626.644395473167281169935.355604527
WLH_2550_V153811.913370053155668157524.086629947
WLH_50__M63955.18373172556629868640.8162682745
WLH_50__V64014.95466442046504066065.0453355796



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