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

Wed, 30 Dec 2009 13:34:23 -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/Dec/30/t1262205478jlev624ebmecds6.htm/, Retrieved Sun, 28 Apr 2024 19:53:53 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=71370, Retrieved Sun, 28 Apr 2024 19:53:53 +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

128

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

-     [Bivariate Data Series] [Bivariate dataset] [2008-01-05 23:51:08] [74be16979710d4c4e7c6647856088456]
- RMPD  [Univariate Explorative Data Analysis] [SHW_WS4_Q3] [2009-10-23 09:32:44] [8b1aef4e7013bd33fbc2a5833375c5f5]
- RM D      [Notched Boxplots] [] [2009-12-30 20:34:23] [84778c3520b84fd5786bccf2e25a5aef] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

262.262	455
261.631	456
258.953	517
259.966	525
262.850	523
262.204	519
263.418	509
262.752	512
266.433	519
267.722	517
266.003	510
262.971	509
265.521	501
264.676	507
270.223	569
269.508	580
268.457	578
265.814	565
266.680	547
263.018	555
269.285	562
269.829	561
270.911	555
266.844	544
271.244	537
269.907	543
271.296	594
270.157	611
271.322	613
267.179	611
264.101	594
265.518	595
269.419	591
268.714	589
272.482	584
268.351	573
268.175	567
270.674	569
272.764	621
272.599	629
270.333	628
270.846	612
270.491	595
269.160	597
274.027	593
273.784	590
276.663	580
274.525	574
271.344	573
271.115	573
270.798	620
273.911	626
273.985	620
271.917	588
273.338	566
270.601	557
273.547	561
275.363	549
281.229	532
277.793	526
279.913	511
282.500	499
280.041	555
282.166	565
290.304	542
283.519	527
287.816	510
285.226	514
287.595	517
289.741	508
289.148	493
288.301	490
290.155	469
289.648	478
288.225	528
289.351	534
294.735	518
305.333	506
309.030	502
310.215	516
321.935	528
325.734	533
320.846	536
323.023	537
319.753	524
321.753	536
320.757	587
324.479	597
324.641	581
322.767	564

Summary of computational transaction
Raw Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	0 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 & 0 seconds \tabularnewline
R Server & 'Gwilym Jenkins' @ 72.249.127.135 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=71370&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]0 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=71370&T=0

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

Boxplot statistics
Variable	lower whisker	lower hinge	median	upper hinge	upper whisker
staatsschuld	258.953	268.351	271.6305	287.816	310.215
werkloosheid	455	517	552	584	629

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
staatsschuld & 258.953 & 268.351 & 271.6305 & 287.816 & 310.215 \tabularnewline
werkloosheid & 455 & 517 & 552 & 584 & 629 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=71370&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]staatsschuld[/C][C]258.953[/C][C]268.351[/C][C]271.6305[/C][C]287.816[/C][C]310.215[/C][/ROW]
[ROW][C]werkloosheid[/C][C]455[/C][C]517[/C][C]552[/C][C]584[/C][C]629[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=71370&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=71370&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
staatsschuld	258.953	268.351	271.6305	287.816	310.215
werkloosheid	455	517	552	584	629

Boxplot Notches
Variable	lower bound	median	upper bound
staatsschuld	268.388669974827	271.6305	274.872330025173
werkloosheid	540.841376229819	552	563.158623770181

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
staatsschuld & 268.388669974827 & 271.6305 & 274.872330025173 \tabularnewline
werkloosheid & 540.841376229819 & 552 & 563.158623770181 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=71370&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]staatsschuld[/C][C]268.388669974827[/C][C]271.6305[/C][C]274.872330025173[/C][/ROW]
[ROW][C]werkloosheid[/C][C]540.841376229819[/C][C]552[/C][C]563.158623770181[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=71370&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=71370&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
staatsschuld	268.388669974827	271.6305	274.872330025173
werkloosheid	540.841376229819	552	563.158623770181

Figure 1

PNG link

Postscript link

PDF link

Parameters (Session):

par1 = 0 ; par2 = 36 ;

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