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_skewness_kurtosis.wasp
Title produced by softwareSkewness and Kurtosis Test
Date of computationSat, 13 Dec 2014 19:28: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/13/t14184989368i1wpykt3a9gez9.htm/, Retrieved Thu, 16 May 2024 21:06:10 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=267278, Retrieved Thu, 16 May 2024 21:06:10 +0000
QR Codes:

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

Tree of Dependent Computations

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Skewness and Kurtosis Test] [skewkurtblog] [2014-12-13 19:28:45] [ba449e08135e498de67ac1fe8477f1b8] [Current]
Feedback Forum

Post a new message

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
96
75
70
88
114
69
176
114
121
110
158
116
181
77
141
35
80
152
97
99
84
68
101
107
88
112
171
137
77
66
93
105
131
89
102
161
120
127
77
108
85
168
48
152
75
107
62
121
124
72
40
58
97
88
126
104
148
146
80
97
25
99
118
58
63
139
50
60
152
142
94
66
127
67
90
75
96
128
41
146
69
186
81
85
54
46
106
34
60
95
57
62
36
56
54
64
76
98
88
35
102
61
80
49
78
90
45
55
96
43
52
60
54
51
51
38
41
146
182
192
263
35
439
214
341
58
292
85
200
158
199
297
227
108
86
302
148
178
120
207
157
128
296
323
79
70
146
246
145
196
199
127
91
153
299
228
190
180
212
269
130
179
243
190
299
121
137
305
157
96
183
52
238
40
226
190
214
145
119
222
222
159
165
249
125
122
186
148
274
172
84
168
102
106
2
139
95
130
72
141
113
206
268
175
77
125
255
111
132
211
92
76
171
83
119
266
186
50
117
219
246
279
148
137
130
181
98
226
234
138
85
66
236
106
135
122
218
199
112
278
94
113
84
86
62
222
167
82
207
184
83
183
85
89
225
237
102
221
128
91
198
204
158
138
226
44
196
83
79
52
105
116
83
196
153
157
75
106
58
75
74
185
265
131
139
196
78

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 Ronald Aylmer Fisher' @ fisher.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 Ronald Aylmer Fisher' @ fisher.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=267278&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 Ronald Aylmer Fisher' @ fisher.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=267278&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=267278&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 Ronald Aylmer Fisher' @ fisher.wessa.net






Skewness and Kurtosis Test
> agostino
	D'Agostino skewness test
data:  x
skew = 0.9499, z = 3.8174, p-value = 0.0001349
alternative hypothesis: data have a skewness

> anscombe
	Anscombe-Glynn kurtosis test
data:  x
kurt = 3.8508, z = 2.4174, p-value = 0.01563
alternative hypothesis: kurtosis is not equal to 3

> jarque
	Jarque-Bera Normality Test
data:  x
JB = 51.8185, p-value = 5.594e-12
alternative hypothesis: greater

> geary
[1] 0.8033256


\begin{tabular}{lllllllll}
\hline
Skewness and Kurtosis Test \tabularnewline

> agostino
	D'Agostino skewness test
data:  x
skew = 0.9499, z = 3.8174, p-value = 0.0001349
alternative hypothesis: data have a skewness

 \tabularnewline

> anscombe
	Anscombe-Glynn kurtosis test
data:  x
kurt = 3.8508, z = 2.4174, p-value = 0.01563
alternative hypothesis: kurtosis is not equal to 3

 \tabularnewline

> jarque
	Jarque-Bera Normality Test
data:  x
JB = 51.8185, p-value = 5.594e-12
alternative hypothesis: greater

 \tabularnewline

> geary
[1] 0.8033256

 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=267278&T=1

[TABLE]
[ROW][C]Skewness and Kurtosis Test[/C][/ROW]
[ROW][C]
> agostino
	D'Agostino skewness test
data:  x
skew = 0.9499, z = 3.8174, p-value = 0.0001349
alternative hypothesis: data have a skewness

[/C][/ROW]
[ROW][C]
> anscombe
	Anscombe-Glynn kurtosis test
data:  x
kurt = 3.8508, z = 2.4174, p-value = 0.01563
alternative hypothesis: kurtosis is not equal to 3

[/C][/ROW]
[ROW][C]
> jarque
	Jarque-Bera Normality Test
data:  x
JB = 51.8185, p-value = 5.594e-12
alternative hypothesis: greater

[/C][/ROW]
[ROW][C]
> geary
[1] 0.8033256

[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=267278&T=1

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

Skewness and Kurtosis Test
> agostino
	D'Agostino skewness test
data:  x
skew = 0.9499, z = 3.8174, p-value = 0.0001349
alternative hypothesis: data have a skewness

> anscombe
	Anscombe-Glynn kurtosis test
data:  x
kurt = 3.8508, z = 2.4174, p-value = 0.01563
alternative hypothesis: kurtosis is not equal to 3

> jarque
	Jarque-Bera Normality Test
data:  x
JB = 51.8185, p-value = 5.594e-12
alternative hypothesis: greater

> geary
[1] 0.8033256


Figures (Output of Computation)

Input Parameters & R Code

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