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

Thu, 05 Nov 2009 03:44:27 -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/05/t1257417934wwayli0q6xiqh37.htm/, Retrieved Fri, 03 May 2024 01:50:02 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=53954, Retrieved Fri, 03 May 2024 01:50:02 +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

SHWWS6

Estimated Impact

107

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]
-    D    [Notched Boxplots] [Notched Boxplots] [2009-11-05 10:44:27] [d1081bd6cdf1fed9ed45c42dbd523bf1] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

7.9	7.3	1.62	-0.8
9.1	7.6	1.49	-0.2
9.4	7.5	1.79	0.2
9.4	7.6	1.8	1
9.1	7.9	1.58	0
9	7.9	1.86	-0.2
9.3	8.1	1.74	1
9.9	8.2	1.59	0.4
9.8	8	1.26	1
9.3	7.5	1.13	1.7
8.3	6.8	1.92	3.1
8	6.5	2.61	3.3
8.5	6.6	2.26	3.1
10.4	7.6	2.41	3.5
11.1	8	2.26	6
10.9	8.1	2.03	5.7
10	7.7	2.86	4.7
9.2	7.5	2.55	4.2
9.2	7.6	2.27	3.6
9.5	7.8	2.26	4.4
9.6	7.8	2.57	2.5
9.5	7.8	3.07	-0.6
9.1	7.5	2.76	-1.9
8.9	7.5	2.51	-1.9
9	7.1	2.87	0.7
10.1	7.5	3.14	-0.9
10.3	7.5	3.11	-1.7
10.2	7.6	3.16	-3.1
9.6	7.7	2.47	-2.1
9.2	7.7	2.57	0.2
9.3	7.9	2.89	1.2
9.4	8.1	2.63	3.8
9.4	8.2	2.38	4
9.2	8.2	1.69	6.6
9	8.2	1.96	5.3
9	7.9	2.19	7.6
9	7.3	1.87	4.7
9.8	6.9	1.6	6.6
10	6.6	1.63	4.4
9.8	6.7	1.22	4.6
9.3	6.9	1.21	6
9	7	1.49	4.8
9	7.1	1.64	4
9.1	7.2	1.66	2.7
9.1	7.1	1.77	3
9.1	6.9	1.82	4.1
9.2	7	1.78	4
8.8	6.8	1.28	2.7
8.3	6.4	1.29	2.6
8.4	6.7	1.37	3.1
8.1	6.6	1.12	4.4
7.7	6.4	1.51	3
7.9	6.3	2.24	2
7.9	6.2	2.94	1.3
8	6.5	3.09	1.5
7.9	6.8	3.46	1.3
7.6	6.8	3.64	3.2
7.1	6.4	4.39	1.8
6.8	6.1	4.15	3.3
6.5	5.8	5.21	1
6.9	6.1	5.8	2.4
8.2	7.2	5.91	0.4
8.7	7.3	5.39	-0.1
8.3	6.9	5.46	1.3
7.9	6.1	4.72	-1.1
7.5	5.8	3.14	-4.4
7.8	6.2	2.63	-7.5
8.3	7.1	2.32	-12.2
8.4	7.7	1.93	-14.5
8.2	7.9	0.62	-16
7.7	7.7	0.6	-16.7
7.2	7.4	-0.37	-16.3
7.3	7.5	-1.1	-16.9

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	'Sir Ronald Aylmer Fisher' @ 193.190.124.24

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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=53954&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	'Sir Ronald Aylmer Fisher' @ 193.190.124.24

Boxplot statistics
Variable	lower whisker	lower hinge	median	upper hinge	upper whisker
WGV	6.5	8.1	9	9.4	11.1
WGM	5.8	6.8	7.3	7.7	8.2
Infl	0.6	1.62	2.24	2.87	4.72
EcGr	-4.4	-0.2	1.8	4	7.6

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
WGV & 6.5 & 8.1 & 9 & 9.4 & 11.1 \tabularnewline
WGM & 5.8 & 6.8 & 7.3 & 7.7 & 8.2 \tabularnewline
Infl & 0.6 & 1.62 & 2.24 & 2.87 & 4.72 \tabularnewline
EcGr & -4.4 & -0.2 & 1.8 & 4 & 7.6 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=53954&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]WGV[/C][C]6.5[/C][C]8.1[/C][C]9[/C][C]9.4[/C][C]11.1[/C][/ROW]
[ROW][C]WGM[/C][C]5.8[/C][C]6.8[/C][C]7.3[/C][C]7.7[/C][C]8.2[/C][/ROW]
[ROW][C]Infl[/C][C]0.6[/C][C]1.62[/C][C]2.24[/C][C]2.87[/C][C]4.72[/C][/ROW]
[ROW][C]EcGr[/C][C]-4.4[/C][C]-0.2[/C][C]1.8[/C][C]4[/C][C]7.6[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=53954&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=53954&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
WGV	6.5	8.1	9	9.4	11.1
WGM	5.8	6.8	7.3	7.7	8.2
Infl	0.6	1.62	2.24	2.87	4.72
EcGr	-4.4	-0.2	1.8	4	7.6

Boxplot Notches
Variable	lower bound	median	upper bound
WGV	8.75959748365915	9	9.24040251634085
WGM	7.1335674886871	7.3	7.4664325113129
Infl	2.00884373428764	2.24	2.47115626571236
EcGr	1.02331494720648	1.8	2.57668505279352

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
WGV & 8.75959748365915 & 9 & 9.24040251634085 \tabularnewline
WGM & 7.1335674886871 & 7.3 & 7.4664325113129 \tabularnewline
Infl & 2.00884373428764 & 2.24 & 2.47115626571236 \tabularnewline
EcGr & 1.02331494720648 & 1.8 & 2.57668505279352 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=53954&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]WGV[/C][C]8.75959748365915[/C][C]9[/C][C]9.24040251634085[/C][/ROW]
[ROW][C]WGM[/C][C]7.1335674886871[/C][C]7.3[/C][C]7.4664325113129[/C][/ROW]
[ROW][C]Infl[/C][C]2.00884373428764[/C][C]2.24[/C][C]2.47115626571236[/C][/ROW]
[ROW][C]EcGr[/C][C]1.02331494720648[/C][C]1.8[/C][C]2.57668505279352[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=53954&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=53954&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
WGV	8.75959748365915	9	9.24040251634085
WGM	7.1335674886871	7.3	7.4664325113129
Infl	2.00884373428764	2.24	2.47115626571236
EcGr	1.02331494720648	1.8	2.57668505279352

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