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

Fri, 13 Nov 2009 07:22:49 -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/13/t1258122246mwsipo0w0czuxd2.htm/, Retrieved Sun, 05 May 2024 10:12:16 +0000

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

120

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]
- R  D    [Notched Boxplots] [Boxplots] [2009-11-13 14:22:49] [d1856923bab8a0db5ebd860815c7444f] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

3.68	2.97	2,67	1,74
3.72	3.04	2,72	1,75
3.77	3.12	2,84	1,83
3.92	3.21	3	2,09
4.12	3.34	3,08	2,12
4.03	3.45	3,21	2,29
3.93	3.74	3,44	2,4
4.03	4.02	3,74	2,82
4.24	4.24	4,08	3,18
4.13	4.87	4,79	4
3.87	5.62	5,44	4,8
4.26	6.02	6,02	5,28
4.46	5.98	6,01	5,37
4.56	5.89	5,85	5,27
4.58	5.76	5,93	5,33
4.85	5.58	5,85	5,23
4.84	5.39	5,74	5,08
4.51	5.19	5,75	5,11
4.37	5.16	5,78	5,1
4.23	5.2	5,62	4,97
4.23	5.25	5,67	5
4.25	5.26	5,89	5,2
4.41	5.21	5,67	4,9
4.28	5.18	5,64	4,82
4.42	5.13	5,64	5,04
4.39	5.03	5,64	4,82
4.44	5.01	5,54	4,77
4.62	4.87	5,52	4,79
4.64	4.86	5,28	4,58
4.34	4.82	5,25	4,59
4.22	4.69	5,23	4,57
4.01	4.65	5,09	4,35
4.11	4.61	5	4,27
4.06	4.47	5,02	4,39
3.82	4.37	4,8	3,97
3.76	4.29	4,71	3,84
3.83	4.2	4,51	3,73
3.79	4.19	4,51	3,58
3.92	4.09	4,42	3,45
4.04	3.88	4,4	3,44
4.02	3.87	4,25	3,25
4.03	3.74	4,18	3,25
3.96	3.61	4,09	3,02
3.7	3.43	3,97	2,87
3.54	3.29	3,89	2,92
3.37	3.18	4,02	2,95
3.39	3.07	3,81	2,75
3.49	3.02	3,67	2,7
3.3	2.97	3,68	2,75
3.14	2.98	3,66	2,72
3.31	3.01	3,66	2,71
3.3	3.06	3,65	2,76
3.26	3.12	3,67	2,68
3.43	3.16	3,66	2,78
3.6	3.19	3,7	2,86
3.76	3.21	3,77	2,75
3.57	3.27	3,74	2,87
3.59	3.36	3,8	2,91
3.66	3.45	3,79	2,79
3.85	3.52	3,75	2,77

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	'Gwilym Jenkins' @ 72.249.127.135

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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=56686&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	'Gwilym Jenkins' @ 72.249.127.135

Boxplot statistics
Variable	lower whisker	lower hinge	median	upper hinge	upper whisker
olo	3.14	3.69	4.015	4.27	4.85
hsh	2.97	3.24	4.14	5.08	6.02
venn<	2.67	3.72	4.41	5.58	6.02
venn>	1.74	2.765	3.445	4.81	5.37

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
olo & 3.14 & 3.69 & 4.015 & 4.27 & 4.85 \tabularnewline
hsh & 2.97 & 3.24 & 4.14 & 5.08 & 6.02 \tabularnewline
venn< & 2.67 & 3.72 & 4.41 & 5.58 & 6.02 \tabularnewline
venn> & 1.74 & 2.765 & 3.445 & 4.81 & 5.37 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=56686&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]olo[/C][C]3.14[/C][C]3.69[/C][C]4.015[/C][C]4.27[/C][C]4.85[/C][/ROW]
[ROW][C]hsh[/C][C]2.97[/C][C]3.24[/C][C]4.14[/C][C]5.08[/C][C]6.02[/C][/ROW]
[ROW][C]venn<[/C][C]2.67[/C][C]3.72[/C][C]4.41[/C][C]5.58[/C][C]6.02[/C][/ROW]
[ROW][C]venn>[/C][C]1.74[/C][C]2.765[/C][C]3.445[/C][C]4.81[/C][C]5.37[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=56686&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=56686&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
olo	3.14	3.69	4.015	4.27	4.85
hsh	2.97	3.24	4.14	5.08	6.02
venn<	2.67	3.72	4.41	5.58	6.02
venn>	1.74	2.765	3.445	4.81	5.37

Boxplot Notches
Variable	lower bound	median	upper bound
olo	3.89669326871785	4.015	4.13330673128215
hsh	3.76468209386353	4.14	4.51531790613647
venn<	4.03060255140552	4.41	4.78939744859448
venn>	3.02786678366897	3.445	3.86213321633103

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
olo & 3.89669326871785 & 4.015 & 4.13330673128215 \tabularnewline
hsh & 3.76468209386353 & 4.14 & 4.51531790613647 \tabularnewline
venn< & 4.03060255140552 & 4.41 & 4.78939744859448 \tabularnewline
venn> & 3.02786678366897 & 3.445 & 3.86213321633103 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=56686&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]olo[/C][C]3.89669326871785[/C][C]4.015[/C][C]4.13330673128215[/C][/ROW]
[ROW][C]hsh[/C][C]3.76468209386353[/C][C]4.14[/C][C]4.51531790613647[/C][/ROW]
[ROW][C]venn<[/C][C]4.03060255140552[/C][C]4.41[/C][C]4.78939744859448[/C][/ROW]
[ROW][C]venn>[/C][C]3.02786678366897[/C][C]3.445[/C][C]3.86213321633103[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=56686&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=56686&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
olo	3.89669326871785	4.015	4.13330673128215
hsh	3.76468209386353	4.14	4.51531790613647
venn<	4.03060255140552	4.41	4.78939744859448
venn>	3.02786678366897	3.445	3.86213321633103

Figure 1

PNG link

Postscript link

PDF link

Parameters (Session):

par1 = grey ;

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