Free Statistics

of Irreproducible Research!

Author's title

Author*The author of this computation has been verified*
R Software Modulerwasp_notchedbox1.wasp
Title produced by softwareNotched Boxplots
Date of computationTue, 10 Nov 2009 14:08:07 -0700
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2009/Nov/10/t1257887366trojpylegamfy48.htm/, Retrieved Mon, 06 May 2024 05:00:41 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=55405, Retrieved Mon, 06 May 2024 05:00:41 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact176
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 Boxplots] [2009-11-10 21:08:07] [40cfc51151e9382b81a5fb0c269b074d] [Current]
Feedback Forum

Post a new message
Dataseries X:
286602	326011	71660	160942
283042	328282	64496	149470
276687	317480	58078	139208
277915	317539	53511	134588
277128	313737	50883	130322
277103	312276	48614	126611
275037	309391	45844	122401
270150	302950	41303	117352
267140	300316	31060	112135
264993	304035	27860	112879
287259	333476	57794	148729
291186	337698	66642	157230
292300	335932	70639	157221
288186	323931	64864	146681
281477	313927	58397	136524
282656	314485	54424	132111
280190	313218	44148	125326
280408	309664	42065	122716
276836	302963	38546	116615
275216	298989	35324	113719
274352	298423	26599	110737
271311	301631	24935	112093
289802	329765	51349	143565
290726	335083	58672	149946
292300	327616	61271	149147
278506	309119	53145	134339
269826	295916	46211	122683
265861	291413	40744	115614
269034	291542	41248	116566
264176	284678	39032	111272
255198	276475	35907	104609
253353	272566	33335	101802
246057	264981	23988	94542
235372	263290	23099	93051
258556	296806	46390	124129
260993	303598	51588	130374
254663	286994	51579	123946
250643	276427	45390	114971
243422	266424	39215	105531
247105	267153	38433	104919
248541	268381	37676	104782
245039	262522	36055	101281
237080	255542	32986	94545
237085	253158	30953	93248
225554	243803	23558	84031
226839	250741	22487	87486
247934	280445	43528	115867
248333	285257	47913	120327
246969	270976	48621	117008
245098	261076	42169	108811
246263	255603	38444	104519
255765	260376	38692	106758
264319	263903	38124	109337
268347	264291	37886	109078
273046	263276	37310	108293
273963	262572	34689	106534
267430	256167	26450	99197
271993	264221	25565	103493
292710	293860	46562	130676
295881	300713	52653	137448
293299	287224	54807	134704




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time2 seconds
R Server'George Udny Yule' @ 72.249.76.132

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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=55405&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 Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time2 seconds
R Server'George Udny Yule' @ 72.249.76.132







Boxplot statistics
Variablelower whiskerlower hingemedianupper hingeupper whisker
WLHmannen225554250643269826280190295881
WLHvrouwen243803264981293860312276337698
WLH_jongeren_wachttijd2248735907420655158871660
WLH_jonger25j84031106534116566132111160942

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
WLHmannen & 225554 & 250643 & 269826 & 280190 & 295881 \tabularnewline
WLHvrouwen & 243803 & 264981 & 293860 & 312276 & 337698 \tabularnewline
WLH_jongeren_wachttijd & 22487 & 35907 & 42065 & 51588 & 71660 \tabularnewline
WLH_jonger25j & 84031 & 106534 & 116566 & 132111 & 160942 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=55405&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]WLHmannen[/C][C]225554[/C][C]250643[/C][C]269826[/C][C]280190[/C][C]295881[/C][/ROW]
[ROW][C]WLHvrouwen[/C][C]243803[/C][C]264981[/C][C]293860[/C][C]312276[/C][C]337698[/C][/ROW]
[ROW][C]WLH_jongeren_wachttijd[/C][C]22487[/C][C]35907[/C][C]42065[/C][C]51588[/C][C]71660[/C][/ROW]
[ROW][C]WLH_jonger25j[/C][C]84031[/C][C]106534[/C][C]116566[/C][C]132111[/C][C]160942[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=55405&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=55405&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
Variablelower whiskerlower hingemedianupper hingeupper whisker
WLHmannen225554250643269826280190295881
WLHvrouwen243803264981293860312276337698
WLH_jongeren_wachttijd2248735907420655158871660
WLH_jonger25j84031106534116566132111160942







Boxplot Notches
Variablelower boundmedianupper bound
WLHmannen263848.693007624269826275803.306992376
WLHvrouwen284292.303306446293860303427.696693554
WLH_jongeren_wachttijd38892.76082352024206545237.2391764798
WLH_jonger25j111391.817140691116566121740.182859309

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
WLHmannen & 263848.693007624 & 269826 & 275803.306992376 \tabularnewline
WLHvrouwen & 284292.303306446 & 293860 & 303427.696693554 \tabularnewline
WLH_jongeren_wachttijd & 38892.7608235202 & 42065 & 45237.2391764798 \tabularnewline
WLH_jonger25j & 111391.817140691 & 116566 & 121740.182859309 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=55405&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]WLHmannen[/C][C]263848.693007624[/C][C]269826[/C][C]275803.306992376[/C][/ROW]
[ROW][C]WLHvrouwen[/C][C]284292.303306446[/C][C]293860[/C][C]303427.696693554[/C][/ROW]
[ROW][C]WLH_jongeren_wachttijd[/C][C]38892.7608235202[/C][C]42065[/C][C]45237.2391764798[/C][/ROW]
[ROW][C]WLH_jonger25j[/C][C]111391.817140691[/C][C]116566[/C][C]121740.182859309[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=55405&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=55405&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
Variablelower boundmedianupper bound
WLHmannen263848.693007624269826275803.306992376
WLHvrouwen284292.303306446293860303427.696693554
WLH_jongeren_wachttijd38892.76082352024206545237.2391764798
WLH_jonger25j111391.817140691116566121740.182859309



Parameters (Session):
par1 = 12 ;
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')