Free Statistics

of Irreproducible Research!

Author's title

Author*Unverified author*
R Software Modulerwasp_notchedbox1.wasp
Title produced by softwareNotched Boxplots
Date of computationWed, 03 Mar 2010 04:15:54 -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/2010/Mar/03/t1267615103frz60i32l8xq7z6.htm/, Retrieved Sun, 23 Jan 2022 02:03:23 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=73837, Retrieved Sun, 23 Jan 2022 02:03:23 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywordsKDGP1W32
Estimated Impact109
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Notched Boxplots] [geboortes new york] [2010-03-03 11:15:54] [a7d39df6c2be69350098f9d3ad37507c] [Current]
Feedback Forum

Post a new message
Dataseries X:
26.663
23.598
26.931
24.740
25.806
24.364
24.477
23.901
23.175
23.227
21.672
21.870
21.439
21.089
23.709
21.669
21.752
20.761
23.479
23.824
23.105
23.110
21.759
22.073
21.937
20.035
23.590
21.672
22.222
22.123
23.950
23.504
22.238
23.142
21.059
21.573
21.548
20.000
22.424
20.615
21.761
22.874
24.104
23.748
23.262
22.907
21.519
22.025
22.604
20.894
24.677
23.673
25.320
23.583
24.671
24.454
24.122
24.252
22.084
22.991
23.287
23.049
25.076
24.037
24.430
24.667
26.451
25.618
25.014
25.110
22.964
23.981
23.798
22.270
24.775
22.646
23.988
24.737
26.276
25.816
25.210
25.199
23.162
24.707
24.364
22.644
25.565
24.062
25.431
24.635
27.009
26.606
26.268
26.462
25.246
25.180
24.657
23.304
26.982
26.199
27.210
26.122
26.706
26.878
26.152
26.379
24.712
25.688
24.990
24.239
26.721
23.475
24.767
26.219
28.361
28.599
27.914
27.784
25.693
26.881
26.217
24.218
27.914
26.975
28.527
27.139
28.982
28.169
28.056
29.136
26.291
26.987
26.589
24.848
27.543
26.896
28.878
27.390
28.065
28.141
29.048
28.484
26.634
27.735
27.132
24.924
28.963
26.589
27.931
28.009
29.229
28.759
28.405
27.945
25.912
26.619
26.076
25.286
27.660
25.951
26.398
25.565
28.865
30.000
29.261
29.012
26.992
27.897




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time2 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 & 2 seconds \tabularnewline
R Server & 'Gwilym Jenkins' @ 72.249.127.135 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=73837&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]'Gwilym Jenkins' @ 72.249.127.135[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=73837&T=0

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







\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
geboortes & 20 & 23.2745 & 24.957 & 26.8795 & 30 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=73837&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]geboortes[/C][C]20[/C][C]23.2745[/C][C]24.957[/C][C]26.8795[/C][C]30[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=73837&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=73837&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
geboortes2023.274524.95726.879530







Boxplot Notches
Variablelower boundmedianupper bound
geboortes24.517551774475524.95725.3964482255245

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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=73837&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
geboortes24.517551774475524.95725.3964482255245



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')