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 computationTue, 02 Dec 2014 11:31:55 +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/02/t14175199466ep5ydcxjwzybtf.htm/, Retrieved Thu, 16 May 2024 18:41:28 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=262510, Retrieved Thu, 16 May 2024 18:41:28 +0000
QR Codes:

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

Tree of Dependent Computations

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Notched Boxplots] [] [2014-12-02 11:31:55] [262ee009a9ad408213aaf69cd2b04529] [Current]
Feedback Forum

Post a new message

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
72 97 120
110 68 94
115 105 118
86 120 90
134 105 115
93 94 114
108 101 117
117 118 110
84 119 113
164 113 31
105 84 117
109 139 107
131 112 113
122 118 102
127 94 125
139 115 84
123 139 109
105 107 118
122 97 114
111 121 127
149 118 103
132 129 113
124 90 106
124 124 122
125 104 110
122 121 113
119 124 116
118 104 127
102 66 116
127 113 113
125 134 95
92 122 100
102 110 91
124 119 109
123 82 127
107 121 93
114 106 128
110 108 120
120 105 110
111 98 135
112 133 99
119 111 101
87 111 131
103 84 101
114 124 101
107 120 111
88 129 126
131 121 135
101 116 96
126 102 112
139 103 128
106 123 120
127 97 95
105 116 116
99 90 83
136 98 130
121 119 118
123 116 148
109 123 106
108 118 111
104 151 116
107 103 112
121 119 137
121 106 133
101 108 101
99 121 122
103 94 87
97 83 108
131 106 136
115 106 126
107 99 98
97 92 119
101 115 99
111 126 101
106 82 108
118 110 106
104 116 132
111 124 99
106 120 118
102 119 117
92 104 117
128 135 120
98 113 100
120 123 123
111 89 96
124 82 106
117 116 137
124 101 107
89 107 106
115 126 134
122 38 122
137 109 136
117 122 117
123 110 108
106 125 133
88 108 110
131 122 129
83 74 120
103 117 98
134 114 131
115 118 129
116 114 137
102 123 120
134 130 105
122 129 123
138 127 124
89 92 124
129 90 143
115 89 128
107 125 114
104 108 124
119 112 96
121 132 107
114 130 128
128 107 134
123 112 144
NA 115 106
NA 93 118
NA 118 110
NA 128 101
NA 132 133
NA 113 132
NA 125 98
NA 108 112
NA 143 92
NA 119 130
NA 117 112
NA 113 116
NA 121 136
NA 127 76
NA 59 141
NA 129 125
NA 136 98
NA 130 112
NA 117 112
NA 89 127
NA 110 105
NA 99 134
NA 131 98
NA 96 107
NA 87 125
NA 126 71
NA 126 105
NA 124 110
NA 115 92
NA 110 136
NA 63 109
NA 90 120
NA 121 113
NA 126 91
NA 140 102
NA 116 122
NA 92 121
NA 87 126
NA 124 131
NA 81 123
NA 116 127
NA 113 116
NA 101 122
NA 83 126
NA 152 88
NA 129 136
NA 127 124
NA 129 157
NA 118 113
NA 120 117
NA 123 135
NA 121 96
NA 94 114
NA 120 113
NA 95 120
NA NA 99
NA NA 90
NA NA 107
NA NA 131
NA NA 132
NA NA 105
NA NA 125
NA NA 121
NA NA 119
NA NA 136
NA NA 141
NA NA 128
NA NA 126
NA NA 144
NA NA 71
NA NA 128
NA NA 104
NA NA 123
NA NA 132
NA NA 105
NA NA 102
NA NA 119
NA NA 151
NA NA 69
NA NA 103
NA NA 122
NA NA 128
NA NA 133
NA NA 110
NA NA 104
NA NA 137
NA NA 118
NA NA 102
NA NA 98
NA NA 130
NA NA 113
NA NA 113
NA NA 124
NA NA 129
NA NA 119

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

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

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
T.2011 & 83 & 104 & 115 & 123.5 & 149 \tabularnewline
T.2012 & 74 & 101.5 & 115 & 123 & 152 \tabularnewline
T.2014 & 76 & 105 & 116 & 127 & 157 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=262510&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]T.2011[/C][C]83[/C][C]104[/C][C]115[/C][C]123.5[/C][C]149[/C][/ROW]
[ROW][C]T.2012[/C][C]74[/C][C]101.5[/C][C]115[/C][C]123[/C][C]152[/C][/ROW]
[ROW][C]T.2014[/C][C]76[/C][C]105[/C][C]116[/C][C]127[/C][C]157[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=262510&T=1

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






Boxplot Notches
Variablelower boundmedianupper bound
T.2011112.139363315383115117.860636684617
T.2012112.402249173472115117.597750826528
T.2014113.607022913504116118.392977086496

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
T.2011 & 112.139363315383 & 115 & 117.860636684617 \tabularnewline
T.2012 & 112.402249173472 & 115 & 117.597750826528 \tabularnewline
T.2014 & 113.607022913504 & 116 & 118.392977086496 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=262510&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]T.2011[/C][C]112.139363315383[/C][C]115[/C][C]117.860636684617[/C][/ROW]
[ROW][C]T.2012[/C][C]112.402249173472[/C][C]115[/C][C]117.597750826528[/C][/ROW]
[ROW][C]T.2014[/C][C]113.607022913504[/C][C]116[/C][C]118.392977086496[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=262510&T=2

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


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