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 computationFri, 12 Dec 2014 14:47:45 +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/12/t1418395671yxnj2ywimlla9gc.htm/, Retrieved Wed, 15 May 2024 16:39:51 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=266762, Retrieved Wed, 15 May 2024 16:39:51 +0000
QR Codes:

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

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]
-    D        [Notched Boxplots] [] [2011-10-18 23:01:09] [b98453cac15ba1066b407e146608df68]
- RM            [Notched Boxplots] [WS3 Question 4] [2014-10-15 13:14:03] [f13ab2b9cdb9c17a0cf473fdf5cac3ab]
- RMPD              [Notched Boxplots] [paper] [2014-12-12 14:47:45] [f37066d0c2d3549c99d3204e671bd762] [Current]
Feedback Forum

Post a new message

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
80 NA
128 NA
123 NA
96 NA
142 NA
101 NA
126 NA
133 NA
106 NA
172 NA
113 NA
121 NA
139 NA
138 NA
135 NA
147 NA
145 NA
113 NA
130 NA
123 NA
161 NA
140 NA
140 NA
134 NA
133 NA
140 NA
127 NA
132 NA
122 NA
135 NA
133 NA
106 NA
126 NA
132 NA
137 NA
117 NA
130 NA
120 NA
128 NA
129 NA
126 NA
127 NA
95 NA
111 NA
122 NA
115 NA
102 NA
139 NA
115 NA
134 NA
147 NA
114 NA
135 NA
121 NA
107 NA
144 NA
129 NA
131 NA
123 NA
132 NA
112 NA
115 NA
129 NA
131 NA
131 NA
109 NA
123 NA
115 NA
147 NA
123 NA
117 NA
105 NA
119 NA
119 NA
126 NA
126 NA
118 NA
119 NA
118 NA
116 NA
102 NA
136 NA
106 NA
128 NA
119 NA
132 NA
125 NA
136 NA
109 NA
129 NA
130 NA
145 NA
131 NA
131 NA
122 NA
110 NA
143 NA
111 NA
113 NA
142 NA
131 NA
134 NA
110 NA
142 NA
132 NA
146 NA
99 NA
137 NA
123 NA
121 NA
124 NA
127 NA
131 NA
122 NA
136 NA
131 NA
NA 109
NA 76
NA 121
NA 130
NA 113
NA 128
NA 109
NA 126
NA 135
NA 121
NA 98
NA 147
NA 120
NA 128
NA 108
NA 123
NA 147
NA 121
NA 119
NA 135
NA 126
NA 137
NA 98
NA 132
NA 112
NA 129
NA 136
NA 120
NA 112
NA 121
NA 150
NA 134
NA 118
NA 127
NA 96
NA 129
NA 114
NA 116
NA 113
NA 118
NA 145
NA 121
NA 121
NA 92
NA 132
NA 130
NA 139
NA 131
NA 126
NA 110
NA 115
NA 131
NA 105
NA 124
NA 108
NA 134
NA 131
NA 126
NA 131
NA 140
NA 159
NA 123
NA 131
NA 122
NA 124
NA 133
NA 110
NA 91
NA 114
NA 124
NA 117
NA 102
NA 123
NA 134
NA 112
NA 130
NA 134
NA 138
NA 138
NA 131
NA 112
NA 149
NA 121
NA 137
NA 97
NA 112
NA 124
NA 119
NA 115
NA 134
NA 94
NA 117
NA 130
NA 118
NA 135
NA 116
NA 130
NA 98
NA 127
NA 122
NA 130
NA 126
NA 133
NA 138
NA 137
NA 135
NA 112
NA 104
NA 97
NA 133
NA 122
NA 120
NA 140
NA 154
NA 117
NA 128
NA 127
NA 127
NA 126
NA 138
NA 140
NA 123
NA 135
NA 120
NA 151
NA 127
NA 125
NA 125
NA 137
NA 147
NA 67
NA 139
NA 144
NA 138
NA 125
NA 121
NA 118
NA 113
NA 139
NA 104
NA 115
NA 136
NA 136
NA 134
NA 125
NA 124
NA 101
NA 122
NA 129
NA 134
NA 154
NA 134
NA 102
NA 115
NA 132
NA 113
NA 136
NA 123
NA 113
NA 91
NA 160
NA 137
NA 137
NA 137
NA 126
NA 130
NA 131
NA 129
NA 104
NA 136
NA 125

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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=266762&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'Gwilym Jenkins' @ jenkins.wessa.net






Boxplot statistics
Variablelower whiskerlower hingemedianupper hingeupper whisker
ams_tot_201195117127134147
ams_tot_201291116126134160

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
ams_tot_2011 & 95 & 117 & 127 & 134 & 147 \tabularnewline
ams_tot_2012 & 91 & 116 & 126 & 134 & 160 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=266762&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]ams_tot_2011[/C][C]95[/C][C]117[/C][C]127[/C][C]134[/C][C]147[/C][/ROW]
[ROW][C]ams_tot_2012[/C][C]91[/C][C]116[/C][C]126[/C][C]134[/C][C]160[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=266762&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=266762&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
ams_tot_201195117127134147
ams_tot_201291116126134160






Boxplot Notches
Variablelower boundmedianupper bound
ams_tot_2011124.506111608282127129.493888391718
ams_tot_2012123.825138842907126128.174861157093

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
ams_tot_2011 & 124.506111608282 & 127 & 129.493888391718 \tabularnewline
ams_tot_2012 & 123.825138842907 & 126 & 128.174861157093 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=266762&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]ams_tot_2011[/C][C]124.506111608282[/C][C]127[/C][C]129.493888391718[/C][/ROW]
[ROW][C]ams_tot_2012[/C][C]123.825138842907[/C][C]126[/C][C]128.174861157093[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=266762&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=266762&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
ams_tot_2011124.506111608282127129.493888391718
ams_tot_2012123.825138842907126128.174861157093


Figures (Output of Computation)

Input Parameters & R Code

Parameters (Session):
par1 = 1 ; par2 = Do not include Seasonal Dummies ; par3 = No Linear Trend ;
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')