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:46:30 +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/t1418395599vpsgywme8l2617o.htm/, Retrieved Wed, 15 May 2024 10:11:52 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=266761, Retrieved Wed, 15 May 2024 10:11:52 +0000
QR Codes:

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

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:46:30] [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
NA 145
113 NA
130 NA
NA 123
161 NA
140 NA
140 NA
134 NA
133 NA
140 NA
127 NA
NA 132
NA 122
135 NA
133 NA
106 NA
126 NA
132 NA
137 NA
117 NA
130 NA
120 NA
128 NA
NA 129
126 NA
127 NA
95 NA
111 NA
122 NA
115 NA
NA 102
139 NA
115 NA
NA 134
147 NA
NA 114
NA 135
NA 121
107 NA
NA 144
129 NA
131 NA
NA 123
132 NA
NA 112
NA 115
129 NA
131 NA
131 NA
109 NA
123 NA
NA 115
147 NA
123 NA
117 NA
NA 105
119 NA
119 NA
NA 126
NA 126
118 NA
119 NA
118 NA
116 NA
NA 102
136 NA
NA 106
128 NA
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
109 NA
76 NA
121 NA
130 NA
NA 113
NA 128
109 NA
126 NA
135 NA
121 NA
98 NA
147 NA
120 NA
128 NA
108 NA
123 NA
NA 147
121 NA
119 NA
135 NA
126 NA
137 NA
98 NA
132 NA
112 NA
129 NA
136 NA
120 NA
NA 112
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
NA 132
NA 130
139 NA
131 NA
NA 126
NA 110
NA 115
NA 131
105 NA
124 NA
NA 108
NA 134
NA 131
NA 126
NA 131
NA 140
NA 159
NA 123
NA 131
122 NA
124 NA
NA 133
110 NA
91 NA
NA 114
124 NA
NA 117
NA 102
123 NA
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
124 NA
NA 119
NA 115
NA 134
94 NA
NA 117
130 NA
NA 118
135 NA
NA 116
130 NA
NA 98
NA 127
NA 122
NA 130
NA 126
133 NA
138 NA
NA 137
135 NA
112 NA
NA 104
97 NA
133 NA
NA 122
NA 120
140 NA
NA 154
117 NA
128 NA
127 NA
NA 127
126 NA
NA 138
140 NA
123 NA
135 NA
120 NA
NA 151
127 NA
125 NA
125 NA
NA 137
147 NA
67 NA
NA 139
144 NA
NA 138
NA 125
NA 121
118 NA
NA 113
NA 139
104 NA
115 NA
136 NA
136 NA
134 NA
125 NA
NA 124
NA 101
122 NA
NA 129
NA 134
154 NA
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
104 NA
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=266761&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=266761&T=0

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

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
ams_tot_s & 92 & 117 & 125.5 & 134 & 154 \tabularnewline
ams_tot_b & 91 & 115 & 127 & 134 & 160 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=266761&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_s[/C][C]92[/C][C]117[/C][C]125.5[/C][C]134[/C][C]154[/C][/ROW]
[ROW][C]ams_tot_b[/C][C]91[/C][C]115[/C][C]127[/C][C]134[/C][C]160[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=266761&T=1

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






Boxplot Notches
Variablelower boundmedianupper bound
ams_tot_s123.306890183628125.5127.693109816372
ams_tot_b124.435218311534127129.564781688466

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
ams_tot_s & 123.306890183628 & 125.5 & 127.693109816372 \tabularnewline
ams_tot_b & 124.435218311534 & 127 & 129.564781688466 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=266761&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_s[/C][C]123.306890183628[/C][C]125.5[/C][C]127.693109816372[/C][/ROW]
[ROW][C]ams_tot_b[/C][C]124.435218311534[/C][C]127[/C][C]129.564781688466[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=266761&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=266761&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_s123.306890183628125.5127.693109816372
ams_tot_b124.435218311534127129.564781688466


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