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

Tue, 02 Dec 2014 13:18:39 +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/02/t14175263448ityzbz2zo95ry8.htm/, Retrieved Thu, 16 May 2024 09:53:33 +0000

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

114

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

-     [Notched Boxplots] [Academic Motivati...] [2010-10-12 12:51:42] [b98453cac15ba1066b407e146608df68]
- RMP   [Notched Boxplots] [] [2014-10-09 22:27:40] [32b17a345b130fdf5cc88718ed94a974]
-    D    [Notched Boxplots] [] [2014-10-15 16:10:36] [eb7e288d9b33566bdff2c7f4784ff40e]
-   PD      [Notched Boxplots] [] [2014-12-02 11:09:53] [a6b2572b29932aa41ecec373f1b28823]
-    D          [Notched Boxplots] [] [2014-12-02 13:18:39] [18ce79f318750841a7d9877f42eaf4c3] [Current]
-    D            [Notched Boxplots] [] [2014-12-02 14:00:49] [a6b2572b29932aa41ecec373f1b28823] 
-    D              [Notched Boxplots] [] [2014-12-02 14:19:29] [a6b2572b29932aa41ecec373f1b28823] 

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

11	19	8	18	7	20	18	23	12	20	20	19	4	4
15	24	18	24	18	19	23	22	20	25	25	24	9	4
16	15	12	16	9	12	22	19	14	15	18	20	5	4
19	17	16	19	17	16	28	25	21	20	24	20	8	9
24	19	22	15	12	9	26	16	24	15	23	21	4	11
25	28	25	28	18	28	28	28	23	28	24	28	4	4
22	26	20	21	20	20	24	21	24	11	24	10	11	4
21	15	19	18	16	16	26	22	20	22	24	22	4	6
27	26	26	22	21	22	28	24	25	22	28	19	6	4
22	16	19	19	17	17	24	24	21	27	26	27	5	8
20	15	18	16	13	12	20	20	21	21	20	25	10	4
21	22	20	18	12	16	26	21	25	19	25	21	4	6
8	26	15	24	6	15	23	27	23	16	24	28	7	4
22	26	19	20	13	17	21	23	19	24	20	22	12	8
23	21	19	19	12	17	23	24	24	22	23	26	4	4
19	22	18	23	10	18	24	22	28	25	24	21	4	9
24	20	22	18	22	15	23	21	22	23	22	26	4	4
25	21	22	16	20	20	25	25	26	20	25	23	4	7
13	22	20	21	8	21	24	21	24	22	27	24	7	4
20	18	14	27	11	6	24	27	21	27	18	23	4	4
22	20	19	19	15	19	27	27	19	21	24	24	5	7
15	24	16	7	10	12	25	25	24	19	26	25	15	5
19	17	16	20	18	14	21	23	16	25	23	23	10	8
22	20	22	20	22	13	27	25	23	16	23	21	8	5
16	20	14	19	7	17	24	19	18	24	22	21	4	9
20	22	15	20	16	19	23	22	18	18	18	18	9	7
21	15	14	14	16	10	24	19	21	15	19	18	4	4
20	20	20	17	16	11	21	21	20	17	19	21	10	4
18	22	14	17	5	11	27	27	25	18	26	23	4	4
16	17	16	8	10	10	25	25	17	26	25	25	7	4
24	14	26	9	16	7	24	25	24	18	18	22	4	7
13	17	13	20	8	12	25	17	21	19	22	23	4	7
20	23	15	20	14	18	23	28	18	17	25	24	4	4
22	16	18	22	15	9	25	20	22	21	26	22	4	4
19	18	21	22	9	16	26	25	20	26	26	24	4	4
15	20	18	16	7	14	16	21	21	21	22	21	10	8
22	18	25	14	16	11	25	24	25	12	28	24	4	4
20	23	20	24	16	20	23	28	23	20	22	25	7	4
21	24	19	21	14	17	26	20	21	20	26	23	4	4
11	23	16	20	5	14	20	19	22	24	23	27	14	4
22	20	23	18	22	16	24	21	24	22	23	23	4	12
22	19	23	19	21	10	27	23	23	20	26	20	4	4
19	22	19	24	13	15	22	18	18	23	23	23	7	4
25	17	15	16	15	10	22	20	14	21	23	20	10	5
21	20	18	14	11	10	25	23	20	17	28	22	4	9
22	21	18	21	20	16	23	24	19	20	24	17	5	4
21	21	22	15	13	10	24	27	18	19	20	20	4	5
22	23	23	21	18	22	24	23	22	17	23	16	4	4
	15		17		13		22		20		24		7
	22		19		18		24		15		14		6
	17		13		8		19		17		23		5
	19		18		16		23		22		26		4
	21		17		21		26		21		24		6
	21		20		17		23		20		21		7
	24		18		18		26		18		22		4
	19		18		15		22		20		20		8
	14		12		8		20		21		24		11
	25		22		22		27		20		21		6
	17		18		13		22		15		23		5
	20		20		18		21		22		22		8
	22		20		15		24		21		23		9
	15		16		11		26		17		21		4
	23		22		19		24		23		27		4
	20		19		19		24		22		23		5
	16		6		4		25		16		27		5
	25		19		17		27		18		27		4
	18		24		10		19		25		23		4
	23		18		20		23		21		22		4

Summary of computational transaction
Raw Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	2 seconds
R Server	'Gwilym Jenkins' @ jenkins.wessa.net
R Framework error message	Warning: there are blank lines in the 'Data X' field. Please, use NA for missing data - blank lines are simply deleted and are NOT treated as missing values.

\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 & 2 seconds \tabularnewline
R Server & 'Gwilym Jenkins' @ jenkins.wessa.net \tabularnewline
R Framework error message & Warning: there are blank lines in the 'Data X' field.
Please, use NA for missing data - blank lines are simply
 deleted and are NOT treated as missing values. \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=262595&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]2 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'Gwilym Jenkins' @ jenkins.wessa.net[/C][/ROW]
[ROW][C]R Framework error message[/C][C]Warning: there are blank lines in the 'Data X' field.
Please, use NA for missing data - blank lines are simply
 deleted and are NOT treated as missing values.[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=262595&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=262595&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	2 seconds
R Server	'Gwilym Jenkins' @ jenkins.wessa.net
R Framework error message	Warning: there are blank lines in the 'Data X' field. Please, use NA for missing data - blank lines are simply deleted and are NOT treated as missing values.

Boxplot statistics
Variable	lower whisker	lower hinge	median	upper hinge	upper whisker
I1F	11	16.5	21	22	27
I1M	12	17	20	22.5	28
I2F	8	15	18	20.5	26
I2M	14	17.5	19.5	22	28
I3F	5	11.5	16	18	25
I3M	6	12	16.5	20	28
E1F	16	21	24	25.5	28
E1M	15	20	22.5	25	28
E2F	14	19	21	23	28
E2M	11	17	20	22	28
E3F	18	22	24	25	28
E3M	15	20	22	24	28
DF	4	4	5	10	15
DM	4	4	4	7	11

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
I1F & 11 & 16.5 & 21 & 22 & 27 \tabularnewline
I1M & 12 & 17 & 20 & 22.5 & 28 \tabularnewline
I2F & 8 & 15 & 18 & 20.5 & 26 \tabularnewline
I2M & 14 & 17.5 & 19.5 & 22 & 28 \tabularnewline
I3F & 5 & 11.5 & 16 & 18 & 25 \tabularnewline
I3M & 6 & 12 & 16.5 & 20 & 28 \tabularnewline
E1F & 16 & 21 & 24 & 25.5 & 28 \tabularnewline
E1M & 15 & 20 & 22.5 & 25 & 28 \tabularnewline
E2F & 14 & 19 & 21 & 23 & 28 \tabularnewline
E2M & 11 & 17 & 20 & 22 & 28 \tabularnewline
E3F & 18 & 22 & 24 & 25 & 28 \tabularnewline
E3M & 15 & 20 & 22 & 24 & 28 \tabularnewline
DF & 4 & 4 & 5 & 10 & 15 \tabularnewline
DM
 & 4 & 4 & 4 & 7 & 11 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=262595&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]I1F[/C][C]11[/C][C]16.5[/C][C]21[/C][C]22[/C][C]27[/C][/ROW]
[ROW][C]I1M[/C][C]12[/C][C]17[/C][C]20[/C][C]22.5[/C][C]28[/C][/ROW]
[ROW][C]I2F[/C][C]8[/C][C]15[/C][C]18[/C][C]20.5[/C][C]26[/C][/ROW]
[ROW][C]I2M[/C][C]14[/C][C]17.5[/C][C]19.5[/C][C]22[/C][C]28[/C][/ROW]
[ROW][C]I3F[/C][C]5[/C][C]11.5[/C][C]16[/C][C]18[/C][C]25[/C][/ROW]
[ROW][C]I3M[/C][C]6[/C][C]12[/C][C]16.5[/C][C]20[/C][C]28[/C][/ROW]
[ROW][C]E1F[/C][C]16[/C][C]21[/C][C]24[/C][C]25.5[/C][C]28[/C][/ROW]
[ROW][C]E1M[/C][C]15[/C][C]20[/C][C]22.5[/C][C]25[/C][C]28[/C][/ROW]
[ROW][C]E2F[/C][C]14[/C][C]19[/C][C]21[/C][C]23[/C][C]28[/C][/ROW]
[ROW][C]E2M[/C][C]11[/C][C]17[/C][C]20[/C][C]22[/C][C]28[/C][/ROW]
[ROW][C]E3F[/C][C]18[/C][C]22[/C][C]24[/C][C]25[/C][C]28[/C][/ROW]
[ROW][C]E3M[/C][C]15[/C][C]20[/C][C]22[/C][C]24[/C][C]28[/C][/ROW]
[ROW][C]DF[/C][C]4[/C][C]4[/C][C]5[/C][C]10[/C][C]15[/C][/ROW]
[ROW][C]DM
[/C][C]4[/C][C]4[/C][C]4[/C][C]7[/C][C]11[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=262595&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=262595&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
I1F	11	16.5	21	22	27
I1M	12	17	20	22.5	28
I2F	8	15	18	20.5	26
I2M	14	17.5	19.5	22	28
I3F	5	11.5	16	18	25
I3M	6	12	16.5	20	28
E1F	16	21	24	25.5	28
E1M	15	20	22.5	25	28
E2F	14	19	21	23	28
E2M	11	17	20	22	28
E3F	18	22	24	25	28
E3M	15	20	22	24	28
DF	4	4	5	10	15
DM	4	4	4	7	11

Boxplot Notches
Variable	lower bound	median	upper bound
I1F	19.9461827092171	21	22.0538172907829
I1M	18.9461827092171	20	21.0538172907829
I2F	16.9461827092171	18	19.0538172907829
I2M	18.6377858529958	19.5	20.3622141470042
I3F	14.7545795654384	16	17.2454204345616
I3M	14.9671748497704	16.5	18.0328251502296
E1F	23.1377858529958	24	24.8622141470042
E1M	21.5419842811065	22.5	23.4580157188935
E2F	20.2335874248852	21	21.7664125751148
E2M	19.0419842811065	20	20.9580157188935
E3F	23.4251905686639	24	24.5748094313361
E3M	21.2335874248852	22	22.7664125751148
DF	3.85038113732778	5	6.14961886267222
DM	3.42519056866389	4	4.57480943133611

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
I1F & 19.9461827092171 & 21 & 22.0538172907829 \tabularnewline
I1M & 18.9461827092171 & 20 & 21.0538172907829 \tabularnewline
I2F & 16.9461827092171 & 18 & 19.0538172907829 \tabularnewline
I2M & 18.6377858529958 & 19.5 & 20.3622141470042 \tabularnewline
I3F & 14.7545795654384 & 16 & 17.2454204345616 \tabularnewline
I3M & 14.9671748497704 & 16.5 & 18.0328251502296 \tabularnewline
E1F & 23.1377858529958 & 24 & 24.8622141470042 \tabularnewline
E1M & 21.5419842811065 & 22.5 & 23.4580157188935 \tabularnewline
E2F & 20.2335874248852 & 21 & 21.7664125751148 \tabularnewline
E2M & 19.0419842811065 & 20 & 20.9580157188935 \tabularnewline
E3F & 23.4251905686639 & 24 & 24.5748094313361 \tabularnewline
E3M & 21.2335874248852 & 22 & 22.7664125751148 \tabularnewline
DF & 3.85038113732778 & 5 & 6.14961886267222 \tabularnewline
DM
 & 3.42519056866389 & 4 & 4.57480943133611 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=262595&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]I1F[/C][C]19.9461827092171[/C][C]21[/C][C]22.0538172907829[/C][/ROW]
[ROW][C]I1M[/C][C]18.9461827092171[/C][C]20[/C][C]21.0538172907829[/C][/ROW]
[ROW][C]I2F[/C][C]16.9461827092171[/C][C]18[/C][C]19.0538172907829[/C][/ROW]
[ROW][C]I2M[/C][C]18.6377858529958[/C][C]19.5[/C][C]20.3622141470042[/C][/ROW]
[ROW][C]I3F[/C][C]14.7545795654384[/C][C]16[/C][C]17.2454204345616[/C][/ROW]
[ROW][C]I3M[/C][C]14.9671748497704[/C][C]16.5[/C][C]18.0328251502296[/C][/ROW]
[ROW][C]E1F[/C][C]23.1377858529958[/C][C]24[/C][C]24.8622141470042[/C][/ROW]
[ROW][C]E1M[/C][C]21.5419842811065[/C][C]22.5[/C][C]23.4580157188935[/C][/ROW]
[ROW][C]E2F[/C][C]20.2335874248852[/C][C]21[/C][C]21.7664125751148[/C][/ROW]
[ROW][C]E2M[/C][C]19.0419842811065[/C][C]20[/C][C]20.9580157188935[/C][/ROW]
[ROW][C]E3F[/C][C]23.4251905686639[/C][C]24[/C][C]24.5748094313361[/C][/ROW]
[ROW][C]E3M[/C][C]21.2335874248852[/C][C]22[/C][C]22.7664125751148[/C][/ROW]
[ROW][C]DF[/C][C]3.85038113732778[/C][C]5[/C][C]6.14961886267222[/C][/ROW]
[ROW][C]DM
[/C][C]3.42519056866389[/C][C]4[/C][C]4.57480943133611[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=262595&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=262595&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
I1F	19.9461827092171	21	22.0538172907829
I1M	18.9461827092171	20	21.0538172907829
I2F	16.9461827092171	18	19.0538172907829
I2M	18.6377858529958	19.5	20.3622141470042
I3F	14.7545795654384	16	17.2454204345616
I3M	14.9671748497704	16.5	18.0328251502296
E1F	23.1377858529958	24	24.8622141470042
E1M	21.5419842811065	22.5	23.4580157188935
E2F	20.2335874248852	21	21.7664125751148
E2M	19.0419842811065	20	20.9580157188935
E3F	23.4251905686639	24	24.5748094313361
E3M	21.2335874248852	22	22.7664125751148
DF	3.85038113732778	5	6.14961886267222
DM	3.42519056866389	4	4.57480943133611

Figure 1

PNG link

Postscript link

PDF link

Parameters (Session):

par1 = 8 ;

Parameters (R input):

par1 = 8 ;

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