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, 10 Nov 2009 03:20:08 -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/10/t12578484440yhipi15gsd79ek.htm/, Retrieved Mon, 06 May 2024 06:34:47 +0000

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

164

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

-     [Back to Back Histogram] [3/11/2009] [2009-11-02 21:58:53] [b98453cac15ba1066b407e146608df68]
- RMPD    [Notched Boxplots] [ws2] [2009-11-10 10:20:08] [94ba0ef70f5b330d175ff4daa1c9cd40] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

115	395.3	798.6
243	395.1	798.4
384	403.5	806.8
216	403.3	806.6
293	405.7	809
140	406.7	810
131	407.2	810.5
162	412.4	815.7
164	415.9	819.2
200	414	817.3
140	411.8	815.1
131	409.9	813.2
133	412.4	815.7
179	415.9	819.2
295	416.3	819.6
250	417.2	820.5
265	421.8	825.1
197	421.4	824.7
179	415.1	818.4
153	412.4	815.7
162	411.8	815.1
195	408.8	812.1
211	404.5	807.8
200	402.5	805.8
203	409.4	812.7
203	410.7	814
353	413.4	816.7
285	415.2	818.5
197	417.7	821
162	417.8	821.1
197	417.9	821.2
176	418.4	821.7
212	418.2	821.5
272	416.6	819.9
204	418.9	822.2
189	421	824.3
240	423.5	826.8
243	432.3	835.6
464	432.3	835.6
378	428.6	831.9
301	426.7	830
293	427.3	830.6
319	428.5	831.8
325	437	840.3
411	442	845.3
327	444.9	848.2
211	441.4	844.7
214	440.3	843.6
206	447.1	850.4
202	455.3	858.6
365	478.6	881.9
432	486.5	889.8
319	487.8	891.1
361	485.9	889.2
234	483.8	887.1
229	488.4	891.7
277	494	897.3
274	493.6	896.9
297	487.3	890.6
386	482.1	885.4
348	484.2	887.5
430	496.8	900.1
656	501.1	904.4
440	499.8	903.1
354	495.5	898.8
501	498.1	901.4
352	503.8	907.1
288	516.2	919.5
403	526.1	929.4
490	527.1	930.4
549	525.1	928.4
503	528.9	932.2
385	540.1	943.4
351	549	952.3
657	556	959.3
602	568.9	972.2
491	589.1	992.4
415	590.3	993.6
308	603.3	1006.6
293	638.8	1042.1
411	643	1046.3
401	656.7	1060
298	656.1	1059.4
334	654.1	1057.4
379	659.9	1063.2
350	662.1	1065.4
652	669.2	1072.5
471	673.1	1076.4
397	678.3	1081.6
512	677.4	1080.7
363	678.5	1081.8
311	672.4	1075.7
352	665.3	1068.6
376	667.9	1071.2
360	672.1	1075.4
345	662.5	1065.8
414	682.3	1085.6
385	692.1	1095.4
442	702.7	1106
611	721.4	1124.7
374	733.2	1136.5
459	747.7	1151
420	737.6	1140.9
249	729.3	1132.6
384	706.1	1109.4
401	674.3	1077.6
208	659	1062.3
336	645.7	1049

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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=55136&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
HK	115	209.5	315	391.5	657
BN	395.1	417.45	485.05	644.35	747.7
VI	798.4	820.75	888.35	1047.65	1151

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
HK & 115 & 209.5 & 315 & 391.5 & 657 \tabularnewline
BN & 395.1 & 417.45 & 485.05 & 644.35 & 747.7 \tabularnewline
VI & 798.4 & 820.75 & 888.35 & 1047.65 & 1151 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=55136&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]HK[/C][C]115[/C][C]209.5[/C][C]315[/C][C]391.5[/C][C]657[/C][/ROW]
[ROW][C]BN[/C][C]395.1[/C][C]417.45[/C][C]485.05[/C][C]644.35[/C][C]747.7[/C][/ROW]
[ROW][C]VI[/C][C]798.4[/C][C]820.75[/C][C]888.35[/C][C]1047.65[/C][C]1151[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=55136&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=55136&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
HK	115	209.5	315	391.5	657
BN	395.1	417.45	485.05	644.35	747.7
VI	798.4	820.75	888.35	1047.65	1151

Boxplot Notches
Variable	lower bound	median	upper bound
HK	287.329526098639	315	342.670473901361
BN	450.55312896583	485.05	519.54687103417
VI	853.85312896583	888.35	922.84687103417

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
HK & 287.329526098639 & 315 & 342.670473901361 \tabularnewline
BN & 450.55312896583 & 485.05 & 519.54687103417 \tabularnewline
VI & 853.85312896583 & 888.35 & 922.84687103417 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=55136&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]HK[/C][C]287.329526098639[/C][C]315[/C][C]342.670473901361[/C][/ROW]
[ROW][C]BN[/C][C]450.55312896583[/C][C]485.05[/C][C]519.54687103417[/C][/ROW]
[ROW][C]VI[/C][C]853.85312896583[/C][C]888.35[/C][C]922.84687103417[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=55136&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=55136&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
HK	287.329526098639	315	342.670473901361
BN	450.55312896583	485.05	519.54687103417
VI	853.85312896583	888.35	922.84687103417

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