Repository of Reproducible Computations

Free Statistics

of Irreproducible Research!

Author's title

Author

*The author of this computation has been verified*

R Software Module

rwasp_notchedbox1.wasp

Title produced by software

Notched Boxplots

Date of computation

Sun, 27 Apr 2014 16:49:50 -0400

Cite this page as follows

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2014/Apr/27/t13986318016mvqkcej7fus3rg.htm/, Retrieved Fri, 17 May 2024 04:48:52 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=234632, Retrieved Fri, 17 May 2024 04:48:52 +0000

QR Codes:

Paste this QR Code to cite your computation.

Original text written by user:

IsPrivate?

No (this computation is public)

User-defined keywords

Estimated Impact

156

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)

-     [Notched Boxplots] [explosion_protect...] [2014-04-23 19:25:28] [816506dd62c702d6df0d5c4d6475d6f7]
- R  D  [Notched Boxplots] [notbox_pressure] [2014-04-27 20:40:21] [816506dd62c702d6df0d5c4d6475d6f7]
- R  D    [Notched Boxplots] [pressure_relief] [2014-04-27 20:47:09] [816506dd62c702d6df0d5c4d6475d6f7]
-   PD        [Notched Boxplots] [vents] [2014-04-27 20:49:50] [0886edc6b443bd4bec60935c27dcdd54] [Current]
- R  D          [Notched Boxplots] [box_expvent] [2014-04-27 20:50:18] [816506dd62c702d6df0d5c4d6475d6f7] 
-    D          [Notched Boxplots] [prot] [2014-04-27 20:52:08] [816506dd62c702d6df0d5c4d6475d6f7] 
- R  D            [Notched Boxplots] [box_prot] [2014-04-27 20:52:32] [816506dd62c702d6df0d5c4d6475d6f7] 
-    D            [Notched Boxplots] [tot] [2014-04-27 20:54:17] [816506dd62c702d6df0d5c4d6475d6f7] 
- R  D              [Notched Boxplots] [box_tot] [2014-04-27 20:54:43] [816506dd62c702d6df0d5c4d6475d6f7] 

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

NA	NA	40755,00	90015,01	63145,51	48010,27	69472,02	81874,32	89738,09	97601,87	105465,64	113329,42
115973,43	115973,43	115973,43	115973,43	115973,43	115973,43	115973,43	115973,43	115973,43	115973,43	115973,43	115973,43
94225,00	94225,00	94225,00	94225,00	94225,00	94225,00	94225,00	94225,00	94225,00	94225,00	94225,00	94225,00
NA	NA	166385,67	129763,67	118948,67	74685,67	91609,33	NA	NA	NA	NA	NA
103349,60	103349,60	103349,60	103349,60	103349,60	103349,60	103349,60	103349,60	103349,60	103349,60	103349,60	103349,60

Summary of computational transaction
Raw Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	1 seconds
R Server	'Herman Ole Andreas Wold' @ wold.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 & 'Herman Ole Andreas Wold' @ wold.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=234632&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]'Herman Ole Andreas Wold' @ wold.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=234632&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=234632&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 Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	1 seconds
R Server	'Herman Ole Andreas Wold' @ wold.wessa.net

Boxplot statistics
Variable	lower whisker	lower hinge	median	upper hinge	upper whisker
2007	94225	98787.3	103349.6	109661.515	115973.43
2008	94225	98787.3	103349.6	109661.515	115973.43
2009	94225	94225	103349.6	115973.43	115973.43
2010	90015.01	94225	103349.6	115973.43	129763.67
2011	63145.51	94225	103349.6	115973.43	118948.67
2012	48010.27	74685.67	94225	103349.6	115973.43
2013	91609.33	91609.33	94225	103349.6	115973.43
2014	81874.32	88049.66	98787.3	109661.515	115973.43
2015	89738.09	91981.545	98787.3	109661.515	115973.43
2016	94225	95913.435	100475.735	109661.515	115973.43
2017	94225	98787.3	104407.62	110719.535	115973.43
2018	94225	98787.3	108339.51	114651.425	115973.43

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
2007 & 94225 & 98787.3 & 103349.6 & 109661.515 & 115973.43 \tabularnewline
2008 & 94225 & 98787.3 & 103349.6 & 109661.515 & 115973.43 \tabularnewline
2009 & 94225 & 94225 & 103349.6 & 115973.43 & 115973.43 \tabularnewline
2010 & 90015.01 & 94225 & 103349.6 & 115973.43 & 129763.67 \tabularnewline
2011 & 63145.51 & 94225 & 103349.6 & 115973.43 & 118948.67 \tabularnewline
2012 & 48010.27 & 74685.67 & 94225 & 103349.6 & 115973.43 \tabularnewline
2013 & 91609.33 & 91609.33 & 94225 & 103349.6 & 115973.43 \tabularnewline
2014 & 81874.32 & 88049.66 & 98787.3 & 109661.515 & 115973.43 \tabularnewline
2015 & 89738.09 & 91981.545 & 98787.3 & 109661.515 & 115973.43 \tabularnewline
2016 & 94225 & 95913.435 & 100475.735 & 109661.515 & 115973.43 \tabularnewline
2017 & 94225 & 98787.3 & 104407.62 & 110719.535 & 115973.43 \tabularnewline
2018 & 94225 & 98787.3 & 108339.51 & 114651.425 & 115973.43 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=234632&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]2007[/C][C]94225[/C][C]98787.3[/C][C]103349.6[/C][C]109661.515[/C][C]115973.43[/C][/ROW]
[ROW][C]2008[/C][C]94225[/C][C]98787.3[/C][C]103349.6[/C][C]109661.515[/C][C]115973.43[/C][/ROW]
[ROW][C]2009[/C][C]94225[/C][C]94225[/C][C]103349.6[/C][C]115973.43[/C][C]115973.43[/C][/ROW]
[ROW][C]2010[/C][C]90015.01[/C][C]94225[/C][C]103349.6[/C][C]115973.43[/C][C]129763.67[/C][/ROW]
[ROW][C]2011[/C][C]63145.51[/C][C]94225[/C][C]103349.6[/C][C]115973.43[/C][C]118948.67[/C][/ROW]
[ROW][C]2012[/C][C]48010.27[/C][C]74685.67[/C][C]94225[/C][C]103349.6[/C][C]115973.43[/C][/ROW]
[ROW][C]2013[/C][C]91609.33[/C][C]91609.33[/C][C]94225[/C][C]103349.6[/C][C]115973.43[/C][/ROW]
[ROW][C]2014[/C][C]81874.32[/C][C]88049.66[/C][C]98787.3[/C][C]109661.515[/C][C]115973.43[/C][/ROW]
[ROW][C]2015[/C][C]89738.09[/C][C]91981.545[/C][C]98787.3[/C][C]109661.515[/C][C]115973.43[/C][/ROW]
[ROW][C]2016[/C][C]94225[/C][C]95913.435[/C][C]100475.735[/C][C]109661.515[/C][C]115973.43[/C][/ROW]
[ROW][C]2017[/C][C]94225[/C][C]98787.3[/C][C]104407.62[/C][C]110719.535[/C][C]115973.43[/C][/ROW]
[ROW][C]2018[/C][C]94225[/C][C]98787.3[/C][C]108339.51[/C][C]114651.425[/C][C]115973.43[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=234632&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=234632&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
Variable	lower whisker	lower hinge	median	upper hinge	upper whisker
2007	94225	98787.3	103349.6	109661.515	115973.43
2008	94225	98787.3	103349.6	109661.515	115973.43
2009	94225	94225	103349.6	115973.43	115973.43
2010	90015.01	94225	103349.6	115973.43	129763.67
2011	63145.51	94225	103349.6	115973.43	118948.67
2012	48010.27	74685.67	94225	103349.6	115973.43
2013	91609.33	91609.33	94225	103349.6	115973.43
2014	81874.32	88049.66	98787.3	109661.515	115973.43
2015	89738.09	91981.545	98787.3	109661.515	115973.43
2016	94225	95913.435	100475.735	109661.515	115973.43
2017	94225	98787.3	104407.62	110719.535	115973.43
2018	94225	98787.3	108339.51	114651.425	115973.43

Boxplot Notches
Variable	lower bound	median	upper bound
2007	93429.9950871881	103349.6	113269.204912812
2008	93429.9950871881	103349.6	113269.204912812
2009	87982.214148689	103349.6	118716.985851311
2010	87982.214148689	103349.6	118716.985851311
2011	87982.214148689	103349.6	118716.985851311
2012	73971.1392695946	94225	114478.860730405
2013	85929.3547930323	94225	102520.645206968
2014	81713.93455	98787.3	115860.66545
2015	84820.1237	98787.3	112754.4763
2016	89614.7518	100475.735	111336.7182
2017	94981.15435	104407.62	113834.08565
2018	95806.85125	108339.51	120872.16875

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
2007 & 93429.9950871881 & 103349.6 & 113269.204912812 \tabularnewline
2008 & 93429.9950871881 & 103349.6 & 113269.204912812 \tabularnewline
2009 & 87982.214148689 & 103349.6 & 118716.985851311 \tabularnewline
2010 & 87982.214148689 & 103349.6 & 118716.985851311 \tabularnewline
2011 & 87982.214148689 & 103349.6 & 118716.985851311 \tabularnewline
2012 & 73971.1392695946 & 94225 & 114478.860730405 \tabularnewline
2013 & 85929.3547930323 & 94225 & 102520.645206968 \tabularnewline
2014 & 81713.93455 & 98787.3 & 115860.66545 \tabularnewline
2015 & 84820.1237 & 98787.3 & 112754.4763 \tabularnewline
2016 & 89614.7518 & 100475.735 & 111336.7182 \tabularnewline
2017 & 94981.15435 & 104407.62 & 113834.08565 \tabularnewline
2018 & 95806.85125 & 108339.51 & 120872.16875 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=234632&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]2007[/C][C]93429.9950871881[/C][C]103349.6[/C][C]113269.204912812[/C][/ROW]
[ROW][C]2008[/C][C]93429.9950871881[/C][C]103349.6[/C][C]113269.204912812[/C][/ROW]
[ROW][C]2009[/C][C]87982.214148689[/C][C]103349.6[/C][C]118716.985851311[/C][/ROW]
[ROW][C]2010[/C][C]87982.214148689[/C][C]103349.6[/C][C]118716.985851311[/C][/ROW]
[ROW][C]2011[/C][C]87982.214148689[/C][C]103349.6[/C][C]118716.985851311[/C][/ROW]
[ROW][C]2012[/C][C]73971.1392695946[/C][C]94225[/C][C]114478.860730405[/C][/ROW]
[ROW][C]2013[/C][C]85929.3547930323[/C][C]94225[/C][C]102520.645206968[/C][/ROW]
[ROW][C]2014[/C][C]81713.93455[/C][C]98787.3[/C][C]115860.66545[/C][/ROW]
[ROW][C]2015[/C][C]84820.1237[/C][C]98787.3[/C][C]112754.4763[/C][/ROW]
[ROW][C]2016[/C][C]89614.7518[/C][C]100475.735[/C][C]111336.7182[/C][/ROW]
[ROW][C]2017[/C][C]94981.15435[/C][C]104407.62[/C][C]113834.08565[/C][/ROW]
[ROW][C]2018[/C][C]95806.85125[/C][C]108339.51[/C][C]120872.16875[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=234632&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=234632&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
Variable	lower bound	median	upper bound
2007	93429.9950871881	103349.6	113269.204912812
2008	93429.9950871881	103349.6	113269.204912812
2009	87982.214148689	103349.6	118716.985851311
2010	87982.214148689	103349.6	118716.985851311
2011	87982.214148689	103349.6	118716.985851311
2012	73971.1392695946	94225	114478.860730405
2013	85929.3547930323	94225	102520.645206968
2014	81713.93455	98787.3	115860.66545
2015	84820.1237	98787.3	112754.4763
2016	89614.7518	100475.735	111336.7182
2017	94981.15435	104407.62	113834.08565
2018	95806.85125	108339.51	120872.16875

Figure 1

PNG link

Postscript link

PDF link

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

Free Statistics

Description of Statistical Computation

Tree of Dependent Computations

Dataset

Tables (Output of Computation)

Figures (Output of Computation)

Input Parameters & R Code