Repository of Reproducible Computations

Free Statistics

of Irreproducible Research!

Author's title

Author

*The author of this computation has been verified*

R Software Module

rwasp_notchedbox1.wasp

Title produced by software

Notched Boxplots

Date of computation

Fri, 12 Dec 2014 09:33:56 +0000

Cite this page as follows

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2014/Dec/12/t14183768494ci17k8a0kw7t9h.htm/, Retrieved Thu, 16 May 2024 18:42:46 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=266450, Retrieved Thu, 16 May 2024 18:42:46 +0000

QR Codes:

Paste this QR Code to cite your computation.

Original text written by user:

IsPrivate?

No (this computation is public)

User-defined keywords

Estimated Impact

126

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)

-       [Notched Boxplots] [] [2014-12-12 09:33:56] [478aede7ebf40ce01402b5cfefb74b76] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

NA 50 50
62 NA 62
NA 54 54
71 NA 71
54 NA 54
65 NA 65
NA 73 73
52 NA 52
84 NA 84
42 NA 42
66 NA 66
65 NA 65
78 NA 78
NA 73 73
NA 75 75
NA 72 72
66 NA 66
NA 70 70
61 NA 61
NA 81 81
71 NA 71
69 NA 69
NA 71 71
72 NA 72
68 NA 68
70 NA 70
68 NA 68
NA 61 61
67 NA 67
NA 76 76
NA 70 70
NA 60 60
72 NA 72
69 NA 69
71 NA 71
62 NA 62
NA 70 70
64 NA 64
58 NA 58
NA 76 76
52 NA 52
59 NA 59
68 NA 68
76 NA 76
65 NA 65
NA 67 67
59 NA 59
69 NA 69
NA 76 76
63 NA 63
75 NA 75
63 NA 63
60 NA 60
73 NA 73
63 NA 63
70 NA 70
NA 75 75
66 NA 66
NA 63 63
63 NA 63
64 NA 64
NA 70 70
NA 75 75
61 NA 61
NA 60 60
62 NA 62
NA 73 73
61 NA 61
66 NA 66
NA 64 64
NA 59 59
NA 64 64
NA 60 60
56 NA 56
NA 78 78
53 NA 53
NA 67 67
59 NA 59
NA 66 66
NA 68 68
71 NA 71
NA 66 66
NA 73 73
NA 72 72
71 NA 71
NA 59 59
64 NA 64
66 NA 66
NA 78 78
NA 68 68
NA 73 73
62 NA 62
65 NA 65
68 NA 68
NA 65 65
60 NA 60
NA 71 71
65 NA 65
68 NA 68
64 NA 64
74 NA 74
69 NA 69
NA 76 76
68 NA 68
72 NA 72
67 NA 67
NA 63 63
NA 59 59
NA 73 73
NA 66 66
NA 62 62
NA 69 69
66 NA 66
51 NA 51
56 NA 56
67 NA 67
69 NA 69
NA 57 57
56 NA 56
55 NA 55
NA 63 63
67 NA 67
NA 65 65
NA 47 47
76 NA 76
64 NA 64
68 NA 68
64 NA 64
65 NA 65
71 NA 71
63 NA 63
60 NA 60
NA 68 68
72 NA 72
70 NA 70
61 NA 61
61 NA 61
62 NA 62
71 NA 71
NA 71 71
51 NA 51
56 NA 56
70 NA 70
73 NA 73
76 NA 76
NA 68 68
NA 48 48
52 NA 52
NA 60 60
NA 59 59
57 NA 57
NA 79 79
60 NA 60
60 NA 60
NA 59 59
62 NA 62
59 NA 59
61 NA 61
NA 71 71
NA 57 57
NA 66 66
NA 63 63
69 NA 69
NA 58 58
59 NA 59
NA 48 48
66 NA 66
NA 73 73
67 NA 67
NA 61 61
NA 68 68
75 NA 75
NA 62 62
69 NA 69
58 NA 58
60 NA 60
74 NA 74
55 NA 55
NA 62 62
63 NA 63
NA 69 69
NA 58 58
NA 58 58
68 NA 68
NA 72 72
62 NA 62
NA 62 62
NA 65 65
NA 69 69
NA 66 66
72 NA 72
62 NA 62
75 NA 75
58 NA 58
NA 66 66
NA 55 55
47 NA 47
NA 72 72
NA 62 62
NA 64 64
NA 64 64
19 NA 19
50 NA 50
NA 68 68
NA 70 70
79 NA 79
NA 69 69
71 NA 71
48 NA 48
NA 73 73
74 NA 74
66 NA 66
71 NA 71
NA 74 74
NA 78 78
NA 75 75
53 NA 53
60 NA 60
70 NA 70
69 NA 69
NA 65 65
NA 78 78
NA 78 78
59 NA 59
72 NA 72
NA 70 70
NA 63 63
NA 63 63
71 NA 71
74 NA 74
NA 67 67
NA 66 66
NA 62 62
80 NA 80
73 NA 73
67 NA 67
61 NA 61
NA 73 73
74 NA 74
32 NA 32
69 NA 69
NA 69 69
NA 84 84
64 NA 64
NA 58 58
59 NA 59
78 NA 78
NA 57 57
60 NA 60
NA 68 68
68 NA 68
73 NA 73
NA 69 69
67 NA 67
NA 60 60
65 NA 65
NA 66 66
74 NA 74
NA 81 81
NA 72 72
55 NA 55
49 NA 49
NA 74 74
53 NA 53
64 NA 64
NA 65 65
57 NA 57
NA 51 51
NA 80 80
67 NA 67
70 NA 70
NA 74 74
75 NA 75
NA 70 70
NA 69 69
65 NA 65
NA 55 55
NA 71 71

Summary of computational transaction
Raw Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	1 seconds
R Server	'Gwilym Jenkins' @ jenkins.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 & 'Gwilym Jenkins' @ jenkins.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=266450&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]'Gwilym Jenkins' @ jenkins.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=266450&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=266450&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 Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	1 seconds
R Server	'Gwilym Jenkins' @ jenkins.wessa.net

Boxplot statistics
Variable	lower whisker	lower hinge	median	upper hinge	upper whisker
EM	47	60	65	70	84
EF	47	62	68	72.5	84
AMS.E	47	61	66	71	84

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
EM & 47 & 60 & 65 & 70 & 84 \tabularnewline
EF & 47 & 62 & 68 & 72.5 & 84 \tabularnewline
AMS.E & 47 & 61 & 66 & 71 & 84 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=266450&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]EM[/C][C]47[/C][C]60[/C][C]65[/C][C]70[/C][C]84[/C][/ROW]
[ROW][C]EF[/C][C]47[/C][C]62[/C][C]68[/C][C]72.5[/C][C]84[/C][/ROW]
[ROW][C]AMS.E[/C][C]47[/C][C]61[/C][C]66[/C][C]71[/C][C]84[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=266450&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=266450&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
Variable	lower whisker	lower hinge	median	upper hinge	upper whisker
EM	47	60	65	70	84
EF	47	62	68	72.5	84
AMS.E	47	61	66	71	84

Boxplot Notches
Variable	lower bound	median	upper bound
EM	63.7430194910023	65	66.2569805089977
EF	66.4855471284982	68	69.5144528715018
AMS.E	65.0523789726316	66	66.9476210273684

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
EM & 63.7430194910023 & 65 & 66.2569805089977 \tabularnewline
EF & 66.4855471284982 & 68 & 69.5144528715018 \tabularnewline
AMS.E & 65.0523789726316 & 66 & 66.9476210273684 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=266450&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]EM[/C][C]63.7430194910023[/C][C]65[/C][C]66.2569805089977[/C][/ROW]
[ROW][C]EF[/C][C]66.4855471284982[/C][C]68[/C][C]69.5144528715018[/C][/ROW]
[ROW][C]AMS.E[/C][C]65.0523789726316[/C][C]66[/C][C]66.9476210273684[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=266450&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=266450&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
Variable	lower bound	median	upper bound
EM	63.7430194910023	65	66.2569805089977
EF	66.4855471284982	68	69.5144528715018
AMS.E	65.0523789726316	66	66.9476210273684

Figure 1

PNG link

Postscript link

PDF link

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

Free Statistics

Description of Statistical Computation

Tree of Dependent Computations

Dataset

Tables (Output of Computation)

Figures (Output of Computation)

Input Parameters & R Code