FreeStatistics.org

Free Statistics

of Irreproducible Research!

Description of Statistical Computation

Author's title

Author*The author of this computation has been verified*
R Software Modulerwasp_notchedbox1.wasp
Title produced by softwareNotched Boxplots
Date of computationWed, 17 Dec 2014 13:34:50 +0000
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2014/Dec/17/t1418823624am7tu032yuaurt4.htm/, Retrieved Thu, 16 May 2024 14:20:14 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=270243, Retrieved Thu, 16 May 2024 14:20:14 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact83

Tree of Dependent Computations

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Percentiles] [Intrinsic Motivat...] [2010-10-12 12:10:58] [b98453cac15ba1066b407e146608df68]
- RMPD  [Kernel Density Estimation] [] [2011-10-18 22:42:23] [b98453cac15ba1066b407e146608df68]
- RMPD    [Percentiles] [] [2011-10-18 22:46:45] [b98453cac15ba1066b407e146608df68]
- RMPD      [Notched Boxplots] [] [2011-10-18 22:58:56] [b98453cac15ba1066b407e146608df68]
- RMPD        [Notched Boxplots] [] [2014-12-15 17:39:17] [bcd8153d44f369b7624d3c1b4621c4c3]
- R  D          [Notched Boxplots] [] [2014-12-15 17:41:08] [bcd8153d44f369b7624d3c1b4621c4c3]
-    D            [Notched Boxplots] [] [2014-12-15 17:43:36] [bcd8153d44f369b7624d3c1b4621c4c3]
-    D              [Notched Boxplots] [] [2014-12-15 17:56:05] [bcd8153d44f369b7624d3c1b4621c4c3]
-                     [Notched Boxplots] [] [2014-12-15 18:21:23] [bcd8153d44f369b7624d3c1b4621c4c3]
-   PD                    [Notched Boxplots] [] [2014-12-17 13:34:50] [6e98989d1e11d52934121e5a163a7817] [Current]
-    D                      [Notched Boxplots] [] [2014-12-17 13:45:16] [bcd8153d44f369b7624d3c1b4621c4c3]
Feedback Forum

Post a new message

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
22	23	24	22
18	22	17	17
23	21	12	23
12	25	23	28
22	17	22	29
21	27	16	21
19	23	19	20
22	23	21	28
15	19	22	26
20	15	23	20
20	20	13	23
21	16	21	24
16	24	20	21
23	25	22	16
18	25	15	21
25	19	25	NA
9	16	10	28
30	19	15	23
23	19	15	29
25	23	15	18
25	21	18	22
18	19	26	14
23	20	16	19
21	20	17	24
14	3	18	19
22	23	6	15
23	15	19	15
23	24	12	20
24	24	28	21
24	24	25	17
18	25	21	21
15	20	NA	20
19	28	NA	24
25	21	NA	28
23	23	NA	27
17	22	NA	20
19	25	NA	27
21	28	NA	22
18	29	NA	20
27	25	NA	17
13	25	NA	21
29	20	NA	18
28	20	NA	24
19	20	NA	24
20	25	NA	18
19	19	NA	27
17	19	NA	19
23	26	NA	20
26	10	NA	23
28	17	NA	25
24	30	NA	21
24	23	NA	23
20	22	NA	19
23	20	NA	25
17	16	NA	20
21	23	NA	25
20	16	NA	27
20	18	NA	18
19	25	NA	26
26	23	NA	24
23	11	NA	27
24	18	NA	16
21	23	NA	15
21	24	NA	27
8	29	NA	18
17	16	NA	21
20	23	NA	21
19	23	NA	18
NA	24	NA	16
NA	20	NA	25
NA	4	NA	22
NA	24	NA	20
NA	16	NA	17
NA	3	NA	23
NA	15	NA	22
NA	20	NA	23
NA	23	NA	18
NA	26	NA	25
NA	23	NA	14
NA	20	NA	22
NA	19	NA	14
NA	24	NA	26
NA	23	NA	24
NA	27	NA	21
NA	22	NA	15
NA	15	NA	NA
NA	22	NA	21
NA	10	NA	20
NA	20	NA	16
NA	23	NA	19
NA	27	NA	16
NA	23	NA	11
NA	25	NA	22
NA	20	NA	20
NA	24	NA	26
NA	NA	NA	20
NA	NA	NA	15
NA	NA	NA	23
NA	NA	NA	25
NA	NA	NA	27
NA	NA	NA	23
NA	NA	NA	20
NA	NA	NA	24
NA	NA	NA	22
NA	NA	NA	27
NA	NA	NA	17
NA	NA	NA	22
NA	NA	NA	26
NA	NA	NA	19
NA	NA	NA	24
NA	NA	NA	22
NA	NA	NA	23
NA	NA	NA	19
NA	NA	NA	20
NA	NA	NA	16
NA	NA	NA	20
NA	NA	NA	22
NA	NA	NA	22
NA	NA	NA	21
NA	NA	NA	26
NA	NA	NA	27
NA	NA	NA	23
NA	NA	NA	21
NA	NA	NA	26
NA	NA	NA	24
NA	NA	NA	27
NA	NA	NA	25
NA	NA	NA	19
NA	NA	NA	18
NA	NA	NA	22
NA	NA	NA	19
NA	NA	NA	19
NA	NA	NA	26
NA	NA	NA	18
NA	NA	NA	21
NA	NA	NA	15
NA	NA	NA	15
NA	NA	NA	26

Tables (Output of Computation)





Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time1 seconds
R Server'Sir Maurice George Kendall' @ kendall.wessa.net

\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 & 'Sir Maurice George Kendall' @ kendall.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=270243&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]'Sir Maurice George Kendall' @ kendall.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=270243&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=270243&T=0

As an alternative you can also use a QR Code:  
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 time1 seconds
R Server'Sir Maurice George Kendall' @ kendall.wessa.net






Boxplot statistics
Variablelower whiskerlower hingemedianupper hingeupper whisker
20111218.5212329
20121519222430
2013615192228
20141419212429

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
2011 & 12 & 18.5 & 21 & 23 & 29 \tabularnewline
2012 & 15 & 19 & 22 & 24 & 30 \tabularnewline
2013 & 6 & 15 & 19 & 22 & 28 \tabularnewline
2014 & 14 & 19 & 21 & 24 & 29 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=270243&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]2011[/C][C]12[/C][C]18.5[/C][C]21[/C][C]23[/C][C]29[/C][/ROW]
[ROW][C]2012[/C][C]15[/C][C]19[/C][C]22[/C][C]24[/C][C]30[/C][/ROW]
[ROW][C]2013[/C][C]6[/C][C]15[/C][C]19[/C][C]22[/C][C]28[/C][/ROW]
[ROW][C]2014[/C][C]14[/C][C]19[/C][C]21[/C][C]24[/C][C]29[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=270243&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=270243&T=1

As an alternative you can also use a QR Code:  
QR Code


The GUIDs for individual cells are displayed in the table below:

Boxplot statistics
Variablelower whiskerlower hingemedianupper hingeupper whisker
20111218.5212329
20121519222430
2013615192228
20141419212429






Boxplot Notches
Variablelower boundmedianupper bound
201120.13778585299582121.8622141470042
201221.18947710185272222.8105228981473
201317.01356535958391920.9864346404161
201420.32258058868712121.6774194113129

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
2011 & 20.1377858529958 & 21 & 21.8622141470042 \tabularnewline
2012 & 21.1894771018527 & 22 & 22.8105228981473 \tabularnewline
2013 & 17.0135653595839 & 19 & 20.9864346404161 \tabularnewline
2014 & 20.3225805886871 & 21 & 21.6774194113129 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=270243&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]2011[/C][C]20.1377858529958[/C][C]21[/C][C]21.8622141470042[/C][/ROW]
[ROW][C]2012[/C][C]21.1894771018527[/C][C]22[/C][C]22.8105228981473[/C][/ROW]
[ROW][C]2013[/C][C]17.0135653595839[/C][C]19[/C][C]20.9864346404161[/C][/ROW]
[ROW][C]2014[/C][C]20.3225805886871[/C][C]21[/C][C]21.6774194113129[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=270243&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=270243&T=2

As an alternative you can also use a QR Code:  
QR Code


The GUIDs for individual cells are displayed in the table below:

Boxplot Notches
Variablelower boundmedianupper bound
201120.13778585299582121.8622141470042
201221.18947710185272222.8105228981473
201317.01356535958391920.9864346404161
201420.32258058868712121.6774194113129


Figures (Output of Computation)

Input Parameters & R Code

Parameters (Session):
par1 = 14 ; par2 = grey ; par3 = TRUE ; par4 = Unknown ;
Parameters (R input):
par1 = grey ;
R code (references can be found in the software module):
par1 <- 'grey'
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')