Free Statistics

of Irreproducible Research!

Author's title

Author*Unverified author*
R Software Modulerwasp_notchedbox1.wasp
Title produced by softwareNotched Boxplots
Date of computationTue, 09 Mar 2010 03:32:40 -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/09/t1268130835wecrh78c0qavgj6.htm/, Retrieved Thu, 28 Mar 2024 16:10:22 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=74183, Retrieved Thu, 28 Mar 2024 16:10:22 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywordsKDGP1W31
Estimated Impact215
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Notched Boxplots] [] [2010-03-09 10:32:40] [fdb60bd07384c15b1c0e403f5c001d61] [Current]
-   PD    [Notched Boxplots] [Notched Boxplots ...] [2010-07-23 12:35:20] [f5ecd041e4b32af12787a4e421b18aaf]
- RM        [Harrell-Davis Quantiles] [Harrell-Davis Qua...] [2010-07-23 12:45:58] [f5ecd041e4b32af12787a4e421b18aaf]
-             [Harrell-Davis Quantiles] [Harrell-Davis Qua...] [2010-07-23 12:47:58] [f5ecd041e4b32af12787a4e421b18aaf]
-               [Harrell-Davis Quantiles] [Harell-Davis Deci...] [2010-07-23 13:01:11] [f5ecd041e4b32af12787a4e421b18aaf]
-               [Harrell-Davis Quantiles] [Harell-Davis Deci...] [2010-07-23 13:03:10] [f5ecd041e4b32af12787a4e421b18aaf]
-                 [Harrell-Davis Quantiles] [Harell-Davis Perc...] [2010-07-23 13:06:06] [f5ecd041e4b32af12787a4e421b18aaf]
Feedback Forum

Post a new message
Dataseries X:
40801
49081
52431
59650
75428
78705
68870
70641
80074
76464
69976
92917
92559
73981
71107
96942
86270
69610
57768
80077
71454
70382
69881
84530
79322
80181
82137
88439
91575
82909
73282
94089
108112
95653
85273
105093
102275
99308
79687
93263
114918
103374
65124
104045
101183
95492
85035
90692
107486
98179
82551
106804
110898
89950
65184
95357
98280
92146
77874
100039
104777
102341
71316
88838
85457
70784
70522
88629
88452
98886
79601
108135
113835
101617
68698
79182
86003
84165
68550
90385
100368
99081
81288
103491
111695
82504
62237
78249
92341
84412
75102
90461
106451
98379
72615
98367
116949
95832
68060
83923
87653
78054
57566
78784
88916
84662
63442
77773
88102
87972
61790
95276
104418
95420
82141
104064
96287
78426
59111
76837
76615
65860
57703
68656
77955
65856
60947
69885
80550
73694
67538
76326
84727




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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=74183&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
Cons & 40801 & 72615 & 84165 & 95653 & 116949 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=74183&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]Cons[/C][C]40801[/C][C]72615[/C][C]84165[/C][C]95653[/C][C]116949[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=74183&T=1

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







Boxplot Notches
Variablelower boundmedianupper bound
Cons81008.71624249238416587321.2837575077

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

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



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