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 computationThu, 15 Dec 2011 12:35:35 -0500
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2011/Dec/15/t13239705455k0ya4ybqqojdrq.htm/, Retrieved Wed, 08 May 2024 14:06:30 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=155594, Retrieved Wed, 08 May 2024 14:06:30 +0000
QR Codes:

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

Tree of Dependent Computations

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Notched Boxplots] [Screen Width and ...] [2010-09-25 10:03:47] [b98453cac15ba1066b407e146608df68]
- R  D  [Notched Boxplots] [Notched Boxplot] [2011-12-15 17:32:20] [586787d3e7267c593af3e1f6b16aa21a]
-    D      [Notched Boxplots] [Notched Boxplot] [2011-12-15 17:35:35] [a0aae37dd27f4b65e222573f53b5a13b] [Current]
Feedback Forum

Post a new message

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
31	33	41	38
38	31	39	32
38	35	30	35
32	33	34	37
36	32	35	29
39	38	39	31
32	33	34	36
39	32	36	35
36	35	37	38
34	33	36	34
27	32	39	38
34	30	33	37
32	33	38	38
29	31	32	32
36	33	31	31
35	33	39	38
37	32	37	39
38	32	41	32
35	33	33	37
38	32	33	33
32	30	31	28
32	33	37	31
32	32	34	37
37	36	29	31
30	28	34	33
38	34	38	28
35	37	37	35
30	27	38	39
35	37	33	34
38	36	36	38
38	41	32	38
34	27	34	38
28	31	37	32
37	27	39	34
33	36	29	34
37	38	35	34
37	33	34	35
38	39	31	35
37	34	34	31
32	36	36	35
37	35	39	40
32	28	31	38
40	32	34	39
41	39	39	30
36	35	37	37
32	33	34	31
37	32	35	37
39	32	32	34
32	33	33	31
28	32	33	34
27	30	29	32
37	38	33	33
28	22	31	36
34	35	36	32
31	35	35	41
30	34	32	28
31	23	29	30
36	36	39	36
32	31	37	35
35	32	35	31
34	38	38	36
NA	NA	36	37
NA	NA	33	39
NA	NA	38	35
NA	NA	43	42
NA	NA	30	34
NA	NA	31	33
NA	NA	32	41
NA	NA	37	34
NA	NA	33	40
NA	NA	34	40
NA	NA	33	35
NA	NA	38	36
NA	NA	33	37
NA	NA	31	27
NA	NA	38	39
NA	NA	37	38
NA	NA	33	31
NA	NA	31	33
NA	NA	44	39
NA	NA	33	36
NA	NA	35	33
NA	NA	40	37
NA	NA	32	29
NA	NA	30	35
NA	NA	35	34
NA	NA	32	34
NA	NA	30	35
NA	NA	40	31
NA	NA	32	27
NA	NA	38	39
NA	NA	42	37
NA	NA	35	39
NA	NA	35	34
NA	NA	33	31
NA	NA	36	32
NA	NA	32	37
NA	NA	33	36
NA	NA	34	32
NA	NA	32	35
NA	NA	34	36

Tables (Output of Computation)





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

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






Boxplot statistics
Variablelower whiskerlower hingemedianupper hingeupper whisker
Connected_M2732353741
Seperate_M2832333539
Connected_F2932343744
Seperate_F2732353742

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
Connected_M & 27 & 32 & 35 & 37 & 41 \tabularnewline
Seperate_M & 28 & 32 & 33 & 35 & 39 \tabularnewline
Connected_F & 29 & 32 & 34 & 37 & 44 \tabularnewline
Seperate_F & 27 & 32 & 35 & 37 & 42 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=155594&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]Connected_M[/C][C]27[/C][C]32[/C][C]35[/C][C]37[/C][C]41[/C][/ROW]
[ROW][C]Seperate_M[/C][C]28[/C][C]32[/C][C]33[/C][C]35[/C][C]39[/C][/ROW]
[ROW][C]Connected_F[/C][C]29[/C][C]32[/C][C]34[/C][C]37[/C][C]44[/C][/ROW]
[ROW][C]Seperate_F[/C][C]27[/C][C]32[/C][C]35[/C][C]37[/C][C]42[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=155594&T=1

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






Boxplot Notches
Variablelower boundmedianupper bound
Connected_M33.98850864853013536.0114913514699
Seperate_M32.39310518911813333.6068948108819
Connected_F33.21392061973413434.7860793802659
Seperate_F34.21392061973413535.7860793802659

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
Connected_M & 33.9885086485301 & 35 & 36.0114913514699 \tabularnewline
Seperate_M & 32.3931051891181 & 33 & 33.6068948108819 \tabularnewline
Connected_F & 33.2139206197341 & 34 & 34.7860793802659 \tabularnewline
Seperate_F & 34.2139206197341 & 35 & 35.7860793802659 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=155594&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]Connected_M[/C][C]33.9885086485301[/C][C]35[/C][C]36.0114913514699[/C][/ROW]
[ROW][C]Seperate_M[/C][C]32.3931051891181[/C][C]33[/C][C]33.6068948108819[/C][/ROW]
[ROW][C]Connected_F[/C][C]33.2139206197341[/C][C]34[/C][C]34.7860793802659[/C][/ROW]
[ROW][C]Seperate_F[/C][C]34.2139206197341[/C][C]35[/C][C]35.7860793802659[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=155594&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=155594&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
Connected_M33.98850864853013536.0114913514699
Seperate_M32.39310518911813333.6068948108819
Connected_F33.21392061973413434.7860793802659
Seperate_F34.21392061973413535.7860793802659


Figures (Output of Computation)

Input Parameters & R Code

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