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_skewness_kurtosis.wasp

Title produced by software

Skewness and Kurtosis Test

Date of computation

Sat, 13 Dec 2014 10:40:16 +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/13/t1418467230u8pptjl45lioy1l.htm/, Retrieved Thu, 16 May 2024 21:08:10 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=266954, Retrieved Thu, 16 May 2024 21:08:10 +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

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

-       [Skewness and Kurtosis Test] [Skewness/kurtosis...] [2014-12-13 10:40:16] [d0ee3c98d5e00815b38c7c808f1992f4] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

NA
139
NA
158
128
224
NA
105
159
167
165
159
119
NA
NA
NA
163
NA
137
NA
153
148
NA
188
149
244
148
NA
150
NA
NA
NA
132
161
105
97
NA
131
166
NA
111
145
162
163
59
NA
109
90
NA
83
116
42
148
155
125
116
NA
138
NA
96
164
NA
NA
202
NA
66
NA
214
188
NA
NA
NA
NA
99
NA
NA
108
NA
NA
110
NA
NA
NA
97
NA
106
80
NA
NA
NA
74
114
140
NA
98
NA
126
98
95
110
70
NA
86
130
96
NA
NA
NA
NA
NA
NA
99
48
50
150
154
NA
68
194
NA
159
NA
NA
39
100
111
138
101
131
101
114
NA
114
111
75
82
121
32
NA
117
71
165
154
126
NA
NA
120
NA
NA
172
NA
114
156
NA
68
89
167
NA
NA
NA
NA
87
NA
2
NA
49
NA
96
NA
NA
100
NA
141
165
165
110
118
NA
146
NA
NA
NA
155
NA
147
NA
NA
NA
NA
61
60
109
68
NA
NA
73
NA
NA
NA
NA
220
65
NA
NA
122
NA
44
52
NA
101
42
152
NA
NA
NA
103
96
175
57
NA
NA
NA
110
131
NA
NA
NA
86
121
NA
NA
NA
88
168
94
51
NA
145
66
85
NA
NA
102
NA
86
114
NA
119
NA
132
142
NA
94
NA
166
NA
64
NA
NA
105
49
NA
95
102
NA
63
NA
NA
117
57
NA
73
NA
NA
105
NA
NA

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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=266954&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	5 seconds
R Server	'Gertrude Mary Cox' @ cox.wessa.net

Skewness and Kurtosis Test
> agostino D'Agostino skewness test data: x skew = 0.2063, z = 0.7187, p-value = 0.4723 alternative hypothesis: data have a skewness
> anscombe Anscombe-Glynn kurtosis test data: x kurt = 3.0038, z = 0.2766, p-value = 0.7821 alternative hypothesis: kurtosis is not equal to 3
> jarque Jarque-Bera Normality Test data: x JB = NA, p-value = NA alternative hypothesis: greater
> geary [1] NA

\begin{tabular}{lllllllll}
\hline
Skewness and Kurtosis Test \tabularnewline
> agostino
	D'Agostino skewness test
data:  x
skew = 0.2063, z = 0.7187, p-value = 0.4723
alternative hypothesis: data have a skewness
 \tabularnewline
> anscombe
	Anscombe-Glynn kurtosis test
data:  x
kurt = 3.0038, z = 0.2766, p-value = 0.7821
alternative hypothesis: kurtosis is not equal to 3
 \tabularnewline
> jarque
	Jarque-Bera Normality Test
data:  x
JB = NA, p-value = NA
alternative hypothesis: greater
 \tabularnewline
> geary
[1] NA
 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=266954&T=1

[TABLE]
[ROW][C]Skewness and Kurtosis Test[/C][/ROW]
[ROW][C]> agostino
	D'Agostino skewness test
data:  x
skew = 0.2063, z = 0.7187, p-value = 0.4723
alternative hypothesis: data have a skewness
[/C][/ROW]
[ROW][C]> anscombe
	Anscombe-Glynn kurtosis test
data:  x
kurt = 3.0038, z = 0.2766, p-value = 0.7821
alternative hypothesis: kurtosis is not equal to 3
[/C][/ROW]
[ROW][C]> jarque
	Jarque-Bera Normality Test
data:  x
JB = NA, p-value = NA
alternative hypothesis: greater
[/C][/ROW]
[ROW][C]> geary
[1] NA
[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=266954&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=266954&T=1

As an alternative you can also use a QR Code:

The GUIDs for individual cells are displayed in the table below:

Skewness and Kurtosis Test
> agostino D'Agostino skewness test data: x skew = 0.2063, z = 0.7187, p-value = 0.4723 alternative hypothesis: data have a skewness
> anscombe Anscombe-Glynn kurtosis test data: x kurt = 3.0038, z = 0.2766, p-value = 0.7821 alternative hypothesis: kurtosis is not equal to 3
> jarque Jarque-Bera Normality Test data: x JB = NA, p-value = NA alternative hypothesis: greater
> geary [1] NA

Parameters (Session):

Parameters (R input):

R code (references can be found in the software module):

library(moments)
agostino <- agostino.test(x)
anscombe <- anscombe.test(x)
geary <- geary(x)
jarque <- jarque.test(x)
load(file='createtable')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Skewness and Kurtosis Test',1,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,paste('',RC.texteval('agostino'),'
',sep=''))
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,paste('',RC.texteval('anscombe'),'
',sep=''))
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,paste('',RC.texteval('jarque'),'
',sep=''))
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,paste('',RC.texteval('geary'),'
',sep=''))
a<-table.row.end(a)
a<-table.end(a)
table.save(a,file='mytable.tab')

Free Statistics

Description of Statistical Computation

Tree of Dependent Computations

Dataset

Tables (Output of Computation)

Figures (Output of Computation)

Input Parameters & R Code