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 computationMon, 15 Dec 2014 18:06:30 +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/15/t14186668535ktut1zz1ikr17m.htm/, Retrieved Thu, 16 May 2024 23:53:51 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=268829, Retrieved Thu, 16 May 2024 23:53:51 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact59
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 18:06:30] [e9774d91d06602b4e3bbce6871390c37] [Current]
Feedback Forum

Post a new message
Dataseries X:
NA 11 NA 8 NA 7 NA 18 NA 12 NA 20
NA 16 NA 12 NA 9 NA 22 NA 14 NA 18
24 NA 24 NA 19 NA 22 NA 25 NA 24 NA
15 NA 16 NA 12 NA 19 NA 15 NA 20 NA
17 NA 19 NA 16 NA 25 NA 20 NA 20 NA
NA 19 NA 16 NA 17 NA 28 NA 21 NA 24
19 NA 15 NA 9 NA 16 NA 15 NA 21 NA
28 NA 28 NA 28 NA 28 NA 28 NA 28 NA
26 NA 21 NA 20 NA 21 NA 11 NA 10 NA
15 NA 18 NA 16 NA 22 NA 22 NA 22 NA
26 NA 22 NA 22 NA 24 NA 22 NA 19 NA
NA 24 NA 22 NA 12 NA 26 NA 24 NA 23
NA 25 NA 25 NA 18 NA 28 NA 23 NA 24
NA 22 NA 20 NA 20 NA 24 NA 24 NA 24
15 NA 16 NA 12 NA 20 NA 21 NA 25 NA
NA 21 NA 19 NA 16 NA 26 NA 20 NA 24
NA 27 NA 26 NA 21 NA 28 NA 25 NA 28
26 NA 20 NA 17 NA 23 NA 24 NA 22 NA
NA 22 NA 19 NA 17 NA 24 NA 21 NA 26
22 NA 23 NA 18 NA 22 NA 25 NA 21 NA
20 NA 18 NA 15 NA 21 NA 23 NA 26 NA
21 NA 16 NA 20 NA 25 NA 20 NA 23 NA
22 NA 21 NA 21 NA 21 NA 22 NA 24 NA
NA 21 NA 20 NA 12 NA 26 NA 25 NA 25
NA 8 NA 15 NA 6 NA 23 NA 23 NA 24
NA 22 NA 19 NA 13 NA 21 NA 19 NA 20
20 NA 19 NA 19 NA 27 NA 21 NA 24 NA
17 NA 20 NA 14 NA 23 NA 25 NA 23 NA
NA 23 NA 19 NA 12 NA 23 NA 24 NA 23
20 NA 19 NA 17 NA 19 NA 24 NA 21 NA
NA 19 NA 18 NA 10 NA 24 NA 28 NA 24
22 NA 17 NA 11 NA 27 NA 18 NA 23 NA
17 NA 8 NA 10 NA 25 NA 26 NA 25 NA
14 NA 9 NA 7 NA 25 NA 18 NA 22 NA
NA 24 NA 22 NA 22 NA 23 NA 22 NA 22
18 NA 22 NA 16 NA 25 NA 26 NA 24 NA
18 NA 14 NA 11 NA 24 NA 12 NA 24 NA
23 NA 24 NA 20 NA 28 NA 20 NA 25 NA
24 NA 21 NA 17 NA 20 NA 20 NA 23 NA
23 NA 20 NA 14 NA 19 NA 24 NA 27 NA
20 NA 18 NA 16 NA 21 NA 22 NA 23 NA
22 NA 24 NA 15 NA 18 NA 23 NA 23 NA
NA 22 NA 19 NA 15 NA 27 NA 19 NA 24
NA 15 NA 16 NA 10 NA 25 NA 24 NA 26
NA 19 NA 16 NA 18 NA 21 NA 16 NA 23
21 NA 15 NA 10 NA 27 NA 19 NA 20 NA
NA 20 NA 15 NA 16 NA 23 NA 18 NA 18
NA 18 NA 14 NA 5 NA 27 NA 25 NA 26
NA 16 NA 16 NA 10 NA 25 NA 17 NA 25
17 NA 13 NA 8 NA 19 NA 17 NA 23 NA
NA 24 NA 26 NA 16 NA 24 NA 24 NA 18
19 NA 18 NA 16 NA 23 NA 22 NA 26 NA
NA 20 NA 15 NA 14 NA 23 NA 18 NA 25
NA 19 NA 21 NA 9 NA 26 NA 20 NA 26
21 NA 17 NA 21 NA 26 NA 21 NA 24 NA
NA 15 NA 18 NA 7 NA 16 NA 21 NA 22
NA 22 NA 25 NA 16 NA 25 NA 25 NA 28
14 NA 12 NA 8 NA 20 NA 21 NA 24 NA
NA 11 NA 16 NA 5 NA 20 NA 22 NA 23
NA 22 NA 23 NA 22 NA 24 NA 24 NA 23
25 NA 19 NA 17 NA 27 NA 18 NA 27 NA
NA 22 NA 18 NA 20 NA 23 NA 19 NA 24
NA 22 NA 23 NA 18 NA 24 NA 22 NA 23




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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=268829&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 time1 seconds
R Server'Gertrude Mary Cox' @ cox.wessa.net







Boxplot statistics
Variablelower whiskerlower hingemedianupper hingeupper whisker
I1M1417202328
I1F1518212227
I2M916192128
I2F816192226
I3M712161928
I3F51014.51822
E1M1620232528
E1F2023242628
E2M1219212428
E2F1219222428
E3M1922232427
E3F2023242528

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
I1M & 14 & 17 & 20 & 23 & 28 \tabularnewline
I1F & 15 & 18 & 21 & 22 & 27 \tabularnewline
I2M & 9 & 16 & 19 & 21 & 28 \tabularnewline
I2F & 8 & 16 & 19 & 22 & 26 \tabularnewline
I3M & 7 & 12 & 16 & 19 & 28 \tabularnewline
I3F & 5 & 10 & 14.5 & 18 & 22 \tabularnewline
E1M & 16 & 20 & 23 & 25 & 28 \tabularnewline
E1F & 20 & 23 & 24 & 26 & 28 \tabularnewline
E2M & 12 & 19 & 21 & 24 & 28 \tabularnewline
E2F & 12 & 19 & 22 & 24 & 28 \tabularnewline
E3M & 19 & 22 & 23 & 24 & 27 \tabularnewline
E3F & 20 & 23 & 24 & 25 & 28 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=268829&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]I1M[/C][C]14[/C][C]17[/C][C]20[/C][C]23[/C][C]28[/C][/ROW]
[ROW][C]I1F[/C][C]15[/C][C]18[/C][C]21[/C][C]22[/C][C]27[/C][/ROW]
[ROW][C]I2M[/C][C]9[/C][C]16[/C][C]19[/C][C]21[/C][C]28[/C][/ROW]
[ROW][C]I2F[/C][C]8[/C][C]16[/C][C]19[/C][C]22[/C][C]26[/C][/ROW]
[ROW][C]I3M[/C][C]7[/C][C]12[/C][C]16[/C][C]19[/C][C]28[/C][/ROW]
[ROW][C]I3F[/C][C]5[/C][C]10[/C][C]14.5[/C][C]18[/C][C]22[/C][/ROW]
[ROW][C]E1M[/C][C]16[/C][C]20[/C][C]23[/C][C]25[/C][C]28[/C][/ROW]
[ROW][C]E1F[/C][C]20[/C][C]23[/C][C]24[/C][C]26[/C][C]28[/C][/ROW]
[ROW][C]E2M[/C][C]12[/C][C]19[/C][C]21[/C][C]24[/C][C]28[/C][/ROW]
[ROW][C]E2F[/C][C]12[/C][C]19[/C][C]22[/C][C]24[/C][C]28[/C][/ROW]
[ROW][C]E3M[/C][C]19[/C][C]22[/C][C]23[/C][C]24[/C][C]27[/C][/ROW]
[ROW][C]E3F[/C][C]20[/C][C]23[/C][C]24[/C][C]25[/C][C]28[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=268829&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=268829&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
I1M1417202328
I1F1518212227
I2M916192128
I2F816192226
I3M712161928
I3F51014.51822
E1M1620232528
E1F2023242628
E2M1219212428
E2F1219222428
E3M1922232427
E3F2023242528







Boxplot Notches
Variablelower boundmedianupper bound
I1M18.349743821542021.65025617846
I1F19.84613114552242122.1538688544776
I2M17.624786517951920.37521348205
I2F17.26919671828371920.7308032817163
I3M14.074701125131617.92529887487
I3F12.192262291044914.516.8077377089551
E1M21.624786517952324.37521348205
E1F23.13459835914182424.8654016408582
E2M19.624786517952122.37521348205
E2F20.55766393190312223.4423360680969
E3M22.449914607182323.55008539282
E3F23.42306557276122424.5769344272388

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
I1M & 18.34974382154 & 20 & 21.65025617846 \tabularnewline
I1F & 19.8461311455224 & 21 & 22.1538688544776 \tabularnewline
I2M & 17.62478651795 & 19 & 20.37521348205 \tabularnewline
I2F & 17.2691967182837 & 19 & 20.7308032817163 \tabularnewline
I3M & 14.07470112513 & 16 & 17.92529887487 \tabularnewline
I3F & 12.1922622910449 & 14.5 & 16.8077377089551 \tabularnewline
E1M & 21.62478651795 & 23 & 24.37521348205 \tabularnewline
E1F & 23.1345983591418 & 24 & 24.8654016408582 \tabularnewline
E2M & 19.62478651795 & 21 & 22.37521348205 \tabularnewline
E2F & 20.5576639319031 & 22 & 23.4423360680969 \tabularnewline
E3M & 22.44991460718 & 23 & 23.55008539282 \tabularnewline
E3F & 23.4230655727612 & 24 & 24.5769344272388 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=268829&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]I1M[/C][C]18.34974382154[/C][C]20[/C][C]21.65025617846[/C][/ROW]
[ROW][C]I1F[/C][C]19.8461311455224[/C][C]21[/C][C]22.1538688544776[/C][/ROW]
[ROW][C]I2M[/C][C]17.62478651795[/C][C]19[/C][C]20.37521348205[/C][/ROW]
[ROW][C]I2F[/C][C]17.2691967182837[/C][C]19[/C][C]20.7308032817163[/C][/ROW]
[ROW][C]I3M[/C][C]14.07470112513[/C][C]16[/C][C]17.92529887487[/C][/ROW]
[ROW][C]I3F[/C][C]12.1922622910449[/C][C]14.5[/C][C]16.8077377089551[/C][/ROW]
[ROW][C]E1M[/C][C]21.62478651795[/C][C]23[/C][C]24.37521348205[/C][/ROW]
[ROW][C]E1F[/C][C]23.1345983591418[/C][C]24[/C][C]24.8654016408582[/C][/ROW]
[ROW][C]E2M[/C][C]19.62478651795[/C][C]21[/C][C]22.37521348205[/C][/ROW]
[ROW][C]E2F[/C][C]20.5576639319031[/C][C]22[/C][C]23.4423360680969[/C][/ROW]
[ROW][C]E3M[/C][C]22.44991460718[/C][C]23[/C][C]23.55008539282[/C][/ROW]
[ROW][C]E3F[/C][C]23.4230655727612[/C][C]24[/C][C]24.5769344272388[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=268829&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=268829&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
I1M18.349743821542021.65025617846
I1F19.84613114552242122.1538688544776
I2M17.624786517951920.37521348205
I2F17.26919671828371920.7308032817163
I3M14.074701125131617.92529887487
I3F12.192262291044914.516.8077377089551
E1M21.624786517952324.37521348205
E1F23.13459835914182424.8654016408582
E2M19.624786517952122.37521348205
E2F20.55766393190312223.4423360680969
E3M22.449914607182323.55008539282
E3F23.42306557276122424.5769344272388



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