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, 14 Dec 2014 20:10:17 +0000

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/Dec/14/t1418588086w9yeuar2nywtwt0.htm/, Retrieved Thu, 16 May 2024 22:28:53 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=267839, Retrieved Thu, 16 May 2024 22:28:53 +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

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

-     [Exercise 1.13] [babies] [2010-10-11 11:21:54] [b98453cac15ba1066b407e146608df68]
- RMPD  [Notched Boxplots] [] [2014-12-14 19:42:59] [6b382800c0d3804662889dbce999b8c7]
- R  D    [Notched Boxplots] [] [2014-12-14 19:54:10] [6b382800c0d3804662889dbce999b8c7]
-    D        [Notched Boxplots] [] [2014-12-14 20:10:17] [6993448de96b8662e47595bfdf466bf3] [Current]
-    D          [Notched Boxplots] [] [2014-12-14 20:20:44] [6b382800c0d3804662889dbce999b8c7] 
-    D            [Notched Boxplots] [] [2014-12-14 20:37:56] [6b382800c0d3804662889dbce999b8c7] 
-    D              [Notched Boxplots] [] [2014-12-14 20:44:38] [6b382800c0d3804662889dbce999b8c7] 

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

NA	NA	41	NA
146	NA	NA	NA
182	NA	NA	NA
192	NA	NA	NA
NA	263	NA	NA
NA	35	NA	NA
439	NA	NA	NA
214	NA	NA	NA
341	NA	NA	NA
58	NA	NA	NA
292	NA	NA	NA
85	NA	NA	NA
200	NA	NA	NA
158	NA	NA	NA
199	NA	NA	NA
297	NA	NA	NA
NA	227	NA	NA
108	NA	NA	NA
86	NA	NA	NA
302	NA	NA	NA
148	NA	NA	NA
178	NA	NA	NA
120	NA	NA	NA
207	NA	NA	NA
157	NA	NA	NA
NA	NA	128	NA
296	NA	NA	NA
323	NA	NA	NA
NA	79	NA	NA
70	NA	NA	NA
146	NA	NA	NA
246	NA	NA	NA
196	NA	NA	NA
199	NA	NA	NA
127	NA	NA	NA
153	NA	NA	NA
299	NA	NA	NA
228	NA	NA	NA
NA	NA	190	NA
180	NA	NA	NA
212	NA	NA	NA
269	NA	NA	NA
NA	130	NA	NA
NA	179	NA	NA
243	NA	NA	NA
190	NA	NA	NA
NA	299	NA	NA
NA	121	NA	NA
NA	137	NA	NA
NA	305	NA	NA
157	NA	NA	NA
96	NA	NA	NA
NA	183	NA	NA
NA	52	NA	NA
NA	238	NA	NA
NA	40	NA	NA
NA	226	NA	NA
NA	190	NA	NA
NA	214	NA	NA
NA	145	NA	NA
NA	119	NA	NA
222	NA	NA	NA
222	NA	NA	NA
NA	159	NA	NA
165	NA	NA	NA
249	NA	NA	NA
NA	125	NA	NA
NA	NA	122	NA
NA	186	NA	NA
NA	148	NA	NA
274	NA	NA	NA
NA	172	NA	NA
NA	84	NA	NA
NA	168	NA	NA
NA	102	NA	NA
NA	106	NA	NA
NA	2	NA	NA
NA	139	NA	NA
NA	95	NA	NA
NA	130	NA	NA
NA	NA	NA	72
NA	141	NA	NA
NA	113	NA	NA
NA	206	NA	NA
268	NA	NA	NA
NA	175	NA	NA
NA	77	NA	NA
NA	125	NA	NA
255	NA	NA	NA
NA	111	NA	NA
132	NA	NA	NA
NA	211	NA	NA
92	NA	NA	NA
NA	76	NA	NA
NA	NA	171	NA
NA	83	NA	NA
NA	266	NA	NA
NA	186	NA	NA
NA	50	NA	NA
117	NA	NA	NA
219	NA	NA	NA
NA	246	NA	NA
279	NA	NA	NA
148	NA	NA	NA
NA	137	NA	NA
181	NA	NA	NA
NA	98	NA	NA
NA	226	NA	NA
234	NA	NA	NA
NA	NA	NA	138
85	NA	NA	NA
66	NA	NA	NA
236	NA	NA	NA
NA	106	NA	NA
135	NA	NA	NA
NA	122	NA	NA
218	NA	NA	NA
199	NA	NA	NA
112	NA	NA	NA
278	NA	NA	NA
NA	94	NA	NA
113	NA	NA	NA
NA	NA	84	NA
NA	NA	86	NA
NA	62	NA	NA
222	NA	NA	NA
167	NA	NA	NA
NA	82	NA	NA
207	NA	NA	NA
NA	184	NA	NA
NA	83	NA	NA
NA	183	NA	NA
NA	89	NA	NA
NA	225	NA	NA
237	NA	NA	NA
102	NA	NA	NA
221	NA	NA	NA
128	NA	NA	NA
91	NA	NA	NA
198	NA	NA	NA
NA	204	NA	NA
NA	158	NA	NA
138	NA	NA	NA
NA	226	NA	NA
NA	NA	NA	44
NA	NA	196	NA
NA	83	NA	NA
NA	NA	NA	79
NA	52	NA	NA
NA	105	NA	NA
NA	NA	NA	116
NA	83	NA	NA
NA	196	NA	NA
NA	153	NA	NA
NA	157	NA	NA
NA	75	NA	NA
NA	106	NA	NA
NA	58	NA	NA
NA	75	NA	NA
NA	74	NA	NA
NA	185	NA	NA
NA	265	NA	NA
NA	131	NA	NA
139	NA	NA	NA
NA	196	NA	NA
NA	NA	NA	78

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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=267839&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	6 seconds
R Server	'Gertrude Mary Cox' @ cox.wessa.net

Boxplot statistics
Variable	lower whisker	lower hinge	median	upper hinge	upper whisker
B_OK_2012_S	58	135	194	236	341
B_OK_2012_B	2	84	134	186	305
B_NOK_2012_S	41	85	125	180.5	196
B_NOK_2012_B	44	72	78.5	116	138

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
B_OK_2012_S & 58 & 135 & 194 & 236 & 341 \tabularnewline
B_OK_2012_B & 2 & 84 & 134 & 186 & 305 \tabularnewline
B_NOK_2012_S & 41 & 85 & 125 & 180.5 & 196 \tabularnewline
B_NOK_2012_B & 44 & 72 & 78.5 & 116 & 138 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=267839&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]B_OK_2012_S[/C][C]58[/C][C]135[/C][C]194[/C][C]236[/C][C]341[/C][/ROW]
[ROW][C]B_OK_2012_B[/C][C]2[/C][C]84[/C][C]134[/C][C]186[/C][C]305[/C][/ROW]
[ROW][C]B_NOK_2012_S[/C][C]41[/C][C]85[/C][C]125[/C][C]180.5[/C][C]196[/C][/ROW]
[ROW][C]B_NOK_2012_B[/C][C]44[/C][C]72[/C][C]78.5[/C][C]116[/C][C]138[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=267839&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=267839&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
B_OK_2012_S	58	135	194	236	341
B_OK_2012_B	2	84	134	186	305
B_NOK_2012_S	41	85	125	180.5	196
B_NOK_2012_B	44	72	78.5	116	138

Boxplot Notches
Variable	lower bound	median	upper bound
B_OK_2012_S	175.449201809261	194	212.550798190739
B_OK_2012_B	115.752223317726	134	152.247776682274
B_NOK_2012_S	71.6523288933809	125	178.347671106619
B_NOK_2012_B	50.1185788469522	78.5	106.881421153048

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
B_OK_2012_S & 175.449201809261 & 194 & 212.550798190739 \tabularnewline
B_OK_2012_B & 115.752223317726 & 134 & 152.247776682274 \tabularnewline
B_NOK_2012_S & 71.6523288933809 & 125 & 178.347671106619 \tabularnewline
B_NOK_2012_B & 50.1185788469522 & 78.5 & 106.881421153048 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=267839&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]B_OK_2012_S[/C][C]175.449201809261[/C][C]194[/C][C]212.550798190739[/C][/ROW]
[ROW][C]B_OK_2012_B[/C][C]115.752223317726[/C][C]134[/C][C]152.247776682274[/C][/ROW]
[ROW][C]B_NOK_2012_S[/C][C]71.6523288933809[/C][C]125[/C][C]178.347671106619[/C][/ROW]
[ROW][C]B_NOK_2012_B[/C][C]50.1185788469522[/C][C]78.5[/C][C]106.881421153048[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=267839&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=267839&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
B_OK_2012_S	175.449201809261	194	212.550798190739
B_OK_2012_B	115.752223317726	134	152.247776682274
B_NOK_2012_S	71.6523288933809	125	178.347671106619
B_NOK_2012_B	50.1185788469522	78.5	106.881421153048

Figure 1

PNG link

Postscript link

PDF link

Parameters (Session):

par1 = 5 ; par2 = grey ; par3 = FALSE ; par4 = Unknown ;

Parameters (R input):

par1 = 5 ;

R code (references can be found in the software module):

par1 <- 'blue'
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