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

Sat, 07 Nov 2009 05:11:38 -0700

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/2009/Nov/07/t1257596052bcibpq6e2hxmpo2.htm/, Retrieved Mon, 06 May 2024 12:05:53 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=54394, Retrieved Mon, 06 May 2024 12:05: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

170

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

-     [Notched Boxplots] [3/11/2009] [2009-11-02 21:10:41] [b98453cac15ba1066b407e146608df68]
-   PD    [Notched Boxplots] [WS6: Notched Bosp...] [2009-11-07 12:11:38] [b8ce264f75295a954feffaf60221d1b0] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

363	14,3	0,8833	15.89
364	14,2	0,87	16.93
363	15,9	0,8758	20.28
358	15,3	0,8858	22.52
357	15,5	0,917	23.51
357	15,1	0,9554	22.59
380	15	0,9922	23.51
378	12,1	0,9778	24.76
376	15,8	0,9808	26.08
380	16,9	0,9811	25.29
379	15,1	1,0014	23.38
384	13,7	1,0183	25.29
392	14,8	1,0622	28.42
394	14,7	1,0773	31.85
392	16	1,0807	30.1
396	15,4	1,0848	25.45
392	15	1,1582	24.95
396	15,5	1,1663	26.84
419	15,1	1,1372	27.52
421	11,7	1,1139	27.94
420	16,3	1,1222	25.23
418	16,7	1,1692	26.53
410	15	1,1702	27.21
418	14,9	1,2286	28.53
426	14,6	1,2613	30.35
428	15,3	1,2646	31.21
430	17,9	1,2262	32.86
424	16,4	1,1985	33.2
423	15,4	1,2007	35.73
427	17,9	1,2138	34.53
441	15,9	1,2266	36.54
449	13,9	1,2176	40.1
452	17,8	1,2218	40.56
462	17,9	1,249	46.14
455	17,4	1,2991	42.85
461	16,7	1,3408	38.22
461	16	1,3119	40.18
463	16,6	1,3014	42.19
462	19,1	1,3201	47.56
456	17,8	1,2938	47.26
455	17,2	1,2694	44.03
456	18,6	1,2165	49.83
472	16,3	1,2037	53.35
472	15,1	1,2292	58.9
471	19,2	1,2256	59.64
465	17,7	1,2015	56.99
459	19,1	1,1786	53.2
465	18	1,1856	53.24
468	17,5	1,2103	57.85
467	17,8	1,1938	55.69
463	21,1	1,202	55.64
460	17,2	1,2271	62.52
462	19,4	1,277	64.4
461	19,8	1,265	64.65
476	17,6	1,2684	67.71
476	16,2	1,2811	67.21
471	19,5	1,2727	59.37
453	19,9	1,2611	53.26
443	20	1,2881	52.42
442	17,3	1,3213	55.03
363	14,3	0,8833	15.89
364	14,2	0,87	16.93
363	15,9	0,8758	20.28
358	15,3	0,8858	22.52
357	15,5	0,917	23.51
357	15,1	0,9554	22.59
380	15	0,9922	23.51
378	12,1	0,9778	24.76
376	15,8	0,9808	26.08
380	16,9	0,9811	25.29
379	15,1	1,0014	23.38
384	13,7	1,0183	25.29
392	14,8	1,0622	28.42
394	14,7	1,0773	31.85
392	16	1,0807	30.1
396	15,4	1,0848	25.45
392	15	1,1582	24.95
396	15,5	1,1663	26.84
419	15,1	1,1372	27.52
421	11,7	1,1139	27.94
420	16,3	1,1222	25.23
418	16,7	1,1692	26.53
410	15	1,1702	27.21
418	14,9	1,2286	28.53
426	14,6	1,2613	30.35
428	15,3	1,2646	31.21
430	17,9	1,2262	32.86
424	16,4	1,1985	33.2
423	15,4	1,2007	35.73
427	17,9	1,2138	34.53
441	15,9	1,2266	36.54
449	13,9	1,2176	40.1
452	17,8	1,2218	40.56
462	17,9	1,249	46.14
455	17,4	1,2991	42.85
461	16,7	1,3408	38.22
461	16	1,3119	40.18
463	16,6	1,3014	42.19
462	19,1	1,3201	47.56
456	17,8	1,2938	47.26
455	17,2	1,2694	44.03
456	18,6	1,2165	49.83
472	16,3	1,2037	53.35
472	15,1	1,2292	58.9
471	19,2	1,2256	59.64
465	17,7	1,2015	56.99
459	19,1	1,1786	53.2
465	18	1,1856	53.24
468	17,5	1,2103	57.85
467	17,8	1,1938	55.69
463	21,1	1,202	55.64
460	17,2	1,2271	62.52
462	19,4	1,277	64.4
461	19,8	1,265	64.65
476	17,6	1,2684	67.71
476	16,2	1,2811	67.21
471	19,5	1,2727	59.37
453	19,9	1,2611	53.26
443	20	1,2881	52.42
442	17,3	1,3213	55.03

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	'RServer@AstonUniversity' @ vre.aston.ac.uk

\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 & 'RServer@AstonUniversity' @ vre.aston.ac.uk \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=54394&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]'RServer@AstonUniversity' @ vre.aston.ac.uk[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=54394&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=54394&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	'RServer@AstonUniversity' @ vre.aston.ac.uk

Boxplot statistics
Variable	lower whisker	lower hinge	median	upper hinge	upper whisker
wk>25jB	357	393	435.5	461.5	476
ExpBE	11.7	15.1	16.3	17.8	21.1
Wssk�-$	0.87	1.08275	1.20285	1.26295	1.3408
RuwOlB/$	15.89	26.305	36.135	53.25	67.71

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
wk>25jB & 357 & 393 & 435.5 & 461.5 & 476 \tabularnewline
ExpBE & 11.7 & 15.1 & 16.3 & 17.8 & 21.1 \tabularnewline
Wssk�-$ & 0.87 & 1.08275 & 1.20285 & 1.26295 & 1.3408 \tabularnewline
RuwOlB/$ & 15.89 & 26.305 & 36.135 & 53.25 & 67.71 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=54394&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]wk>25jB[/C][C]357[/C][C]393[/C][C]435.5[/C][C]461.5[/C][C]476[/C][/ROW]
[ROW][C]ExpBE[/C][C]11.7[/C][C]15.1[/C][C]16.3[/C][C]17.8[/C][C]21.1[/C][/ROW]
[ROW][C]Wssk�-$[/C][C]0.87[/C][C]1.08275[/C][C]1.20285[/C][C]1.26295[/C][C]1.3408[/C][/ROW]
[ROW][C]RuwOlB/$[/C][C]15.89[/C][C]26.305[/C][C]36.135[/C][C]53.25[/C][C]67.71[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=54394&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=54394&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
wk>25jB	357	393	435.5	461.5	476
ExpBE	11.7	15.1	16.3	17.8	21.1
Wssk�-$	0.87	1.08275	1.20285	1.26295	1.3408
RuwOlB/$	15.89	26.305	36.135	53.25	67.71

Boxplot Notches
Variable	lower bound	median	upper bound
wk>25jB	425.619997933536	435.5	445.380002066464
ExpBE	15.9105692616138	16.3	16.6894307383862
Wssk�-$	1.17685910405289	1.20285	1.22884089594711
RuwOlB/$	32.2486254645128	36.135	40.0213745354872

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
wk>25jB & 425.619997933536 & 435.5 & 445.380002066464 \tabularnewline
ExpBE & 15.9105692616138 & 16.3 & 16.6894307383862 \tabularnewline
Wssk�-$ & 1.17685910405289 & 1.20285 & 1.22884089594711 \tabularnewline
RuwOlB/$ & 32.2486254645128 & 36.135 & 40.0213745354872 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=54394&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]wk>25jB[/C][C]425.619997933536[/C][C]435.5[/C][C]445.380002066464[/C][/ROW]
[ROW][C]ExpBE[/C][C]15.9105692616138[/C][C]16.3[/C][C]16.6894307383862[/C][/ROW]
[ROW][C]Wssk�-$[/C][C]1.17685910405289[/C][C]1.20285[/C][C]1.22884089594711[/C][/ROW]
[ROW][C]RuwOlB/$[/C][C]32.2486254645128[/C][C]36.135[/C][C]40.0213745354872[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=54394&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=54394&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
wk>25jB	425.619997933536	435.5	445.380002066464
ExpBE	15.9105692616138	16.3	16.6894307383862
Wssk�-$	1.17685910405289	1.20285	1.22884089594711
RuwOlB/$	32.2486254645128	36.135	40.0213745354872

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