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:45:21 +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/t1418395538thp26kq1uqowiow.htm/, Retrieved Thu, 16 May 2024 01:36:34 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=266760, Retrieved Thu, 16 May 2024 01:36:34 +0000
QR Codes:

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

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:45:21] [f37066d0c2d3549c99d3204e671bd762] [Current]
Feedback Forum

Post a new message

Dataset

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

Tables (Output of Computation)





Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time11 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 & 11 seconds \tabularnewline
R Server & 'Gwilym Jenkins' @ jenkins.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=266760&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]11 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=266760&T=0

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






Boxplot statistics
Variablelower whiskerlower hingemedianupper hingeupper whisker
ams_tot_m94115126133159
ams_tot_f92117.5127135161

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
ams_tot_m & 94 & 115 & 126 & 133 & 159 \tabularnewline
ams_tot_f & 92 & 117.5 & 127 & 135 & 161 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=266760&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_m[/C][C]94[/C][C]115[/C][C]126[/C][C]133[/C][C]159[/C][/ROW]
[ROW][C]ams_tot_f[/C][C]92[/C][C]117.5[/C][C]127[/C][C]135[/C][C]161[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=266760&T=1

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






Boxplot Notches
Variablelower boundmedianupper bound
ams_tot_m123.772407280234126128.227592719766
ams_tot_f124.51695669948127129.48304330052

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
ams_tot_m & 123.772407280234 & 126 & 128.227592719766 \tabularnewline
ams_tot_f & 124.51695669948 & 127 & 129.48304330052 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=266760&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_m[/C][C]123.772407280234[/C][C]126[/C][C]128.227592719766[/C][/ROW]
[ROW][C]ams_tot_f[/C][C]124.51695669948[/C][C]127[/C][C]129.48304330052[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=266760&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=266760&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_m123.772407280234126128.227592719766
ams_tot_f124.51695669948127129.48304330052


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