Repository of Reproducible Computations

Free Statistics

of Irreproducible Research!

Author's title

Author

*Unverified author*

R Software Module

rwasp_notchedbox1.wasp

Title produced by software

Notched Boxplots

Date of computation

Thu, 12 Aug 2010 09:40:08 +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/2010/Aug/12/t12816061587lkydjv9ixdtsui.htm/, Retrieved Sat, 04 May 2024 08:47:04 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=78659, Retrieved Sat, 04 May 2024 08:47:04 +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

174

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

-     [Univariate Data Series] [Omzet product x] [2010-08-12 08:25:08] [74be16979710d4c4e7c6647856088456]
- RMP   [Histogram] [] [2010-08-12 08:32:15] [74be16979710d4c4e7c6647856088456]
- RMP     [Kernel Density Estimation] [] [2010-08-12 09:10:10] [74be16979710d4c4e7c6647856088456]
- RMPD        [Notched Boxplots] [] [2010-08-12 09:40:08] [ea4db07d8da34007b79212461ea6aa7b] [Current]
- RM D          [Univariate Data Series] [] [2010-08-12 10:23:23] [0054c34847e75ef4340aed26951eb951] 

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

94	94	94
93	93	93
92	92	92
90	90	90
110	110	110
109	109	109
94	94	94
84	84	84
85	85	85
85	85	85
86	86	86
88	88	88
93	93	93
94	94	94
90	90	90
91	91	91
104	104	104
103	103	103
88	88	88
79	79	79
82	82	82
88	88	88
93	93	93
89	89	89
94	94	94
96	96	96
94	94	94
92	92	92
113	113	113
122	122	122
107	107	107
98	98	98
103	103	103
110	110	110
113	113	113
110	110	110
123	123	123
124	124	124
118	118	118
117	117	117
139	139	139
146	146	146
134	134	134
121	121	121
123	123	123
122	122	122
127	127	127
122	122	122
139	139	139
136	136	136
127	127	127
123	123	123
140	140	140
146	146	146
138	138	138
120	120	120
122	122	122
115	115	115
115	115	115
102	102	102
119	119	119
114	114	114
108	108	108
102	102	102
121	121	121
109	109	109
102	102	102
95	95	95
98	98	98
92	92	92
94	94	94
90	90	90
113	113	113
111	111	111
103	103	103
90	90	90
108	108	108
99	99	99
95	95	95
91	91	91
85	85	85
72	72	72
90	90	90
90	90	90
114	114	114
115	115	115
104	104	104
93	93	93
101	101	101
90	90	90
79	79	79
75	75	75
71	71	71
61	61	61
84	84	84
87	87	87
107	107	107
99	99	99
93	93	93
74	74	74
87	87	87
71	71	71
67	67	67
61	61	61
63	63	63
52	52	52
80	80	80
84	84	84
102	102	102
93	93	93
87	87	87
72	72	72
83	83	83
72	72	72
66	66	66
64	64	64
64	64	64
47	47	47
77	77	77
79	79	79

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=78659&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=78659&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=78659&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
reeks	47	86.5	94	113	146
reeks	47	86.5	94	113	146
reeks	47	86.5	94	113	146

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
reeks & 47 & 86.5 & 94 & 113 & 146 \tabularnewline
reeks & 47 & 86.5 & 94 & 113 & 146 \tabularnewline
reeks & 47 & 86.5 & 94 & 113 & 146 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=78659&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]reeks[/C][C]47[/C][C]86.5[/C][C]94[/C][C]113[/C][C]146[/C][/ROW]
[ROW][C]reeks[/C][C]47[/C][C]86.5[/C][C]94[/C][C]113[/C][C]146[/C][/ROW]
[ROW][C]reeks[/C][C]47[/C][C]86.5[/C][C]94[/C][C]113[/C][C]146[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=78659&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=78659&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
reeks	47	86.5	94	113	146
reeks	47	86.5	94	113	146
reeks	47	86.5	94	113	146

Boxplot Notches
Variable	lower bound	median	upper bound
reeks	90.1778094195431	94	97.8221905804569
reeks	90.1778094195431	94	97.8221905804569
reeks	90.1778094195431	94	97.8221905804569

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
reeks & 90.1778094195431 & 94 & 97.8221905804569 \tabularnewline
reeks & 90.1778094195431 & 94 & 97.8221905804569 \tabularnewline
reeks & 90.1778094195431 & 94 & 97.8221905804569 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=78659&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]reeks[/C][C]90.1778094195431[/C][C]94[/C][C]97.8221905804569[/C][/ROW]
[ROW][C]reeks[/C][C]90.1778094195431[/C][C]94[/C][C]97.8221905804569[/C][/ROW]
[ROW][C]reeks[/C][C]90.1778094195431[/C][C]94[/C][C]97.8221905804569[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=78659&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=78659&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
reeks	90.1778094195431	94	97.8221905804569
reeks	90.1778094195431	94	97.8221905804569
reeks	90.1778094195431	94	97.8221905804569

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