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

Wed, 17 Dec 2014 11:59:07 +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/17/t1418817560n76jyipm9ule2q2.htm/, Retrieved Thu, 16 May 2024 15:31:20 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=270094, Retrieved Thu, 16 May 2024 15:31:20 +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] [] [2014-12-17 11:59:07] [f235c2d73cdbd6a2c0ce149cb9653e7d] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

0.065008
0.614385
-0.0612015
-0.00970663
-0.256396
-0.0334837
-0.0689857
-0.205761
-0.292333
0.00543114
0.188343
-0.0485756
0.00555253
-0.00145092
-0.191393
-0.11277
0.100612
0.0158982
0.190324
0.0889821
0.0698743
0.317928
-0.133659
0.312264
0.00984158
0.0829983
0.126642
-0.113456
-0.041469
0.0869908
-0.129557
0.285798
-0.104212
-0.128314
0.126813
-0.0584557
-0.274956
-0.12781
0.0339588
0.1215
0.155794
0.0174826
0.117349
-0.106688
-0.0237018
-0.0885253
0.465927
-0.0607347
-0.155919
0.0432765
0.379367
0.274174
-0.228707
0.116483
0.0271189
-0.175179
0.432758
-0.0529622
0.0418453
-0.156124
0.518991
-0.18914
-0.179215
-0.448808
-0.448808
-0.125741
-0.14101
-0.113747
-0.185406
-0.0515179
0.0841505
0.117427
-0.0795998
-0.0267584
0.157878
-0.165159
-0.097565
0.173002
0.192459
-0.0706746
0.00011202
0.111336
-0.056015
0.423349
-0.116928
-0.0536678
0.0437169
-0.181422
0.178634
-0.0187421
-0.024783
-0.0123265
-0.103544
0.178845
0.134319
-0.0833277
-0.0342747
-0.445629
-0.502276
0.306649
-0.123462
-0.196056
0.132538
0.15367
-0.185935
-0.142621
0.225841
-0.101053
-0.112683
0.233693
0.246468
0.19679
0.066871
0.207964
0.0551443
-0.0122079
-0.440077
0.543393
-0.0654679
-0.0503542
0.193905
0.340426
0.252604
-0.187355
-0.0914265
-0.0818456
0.0937488
0.216988
-0.0704913
-0.0914546
-0.232625
0.220585
-0.0873974
0.170289
0.208884
0.0271189
0.153569
-0.185329
-0.0626741
-0.194083
0.429459
-0.093256
0.0060243
-0.00117237
-0.226083
0.0850623
0.110395
-0.197992
-0.151158
-0.0340396
-0.203308
-0.226013
-0.134441
-0.175179
-0.103136
-0.266117
0.208884
0.166159
0.283489
-0.216941
0.392504
-0.098643
-0.18259
-0.178074
-0.166593
-0.219154
0.013528
0.44255
-0.0796371
0.146073
-0.699505

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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=270094&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	1 seconds
R Server	'Sir Maurice George Kendall' @ kendall.wessa.net

Skewness and Kurtosis Test
> agostino D'Agostino skewness test data: x skew = 0.2165, z = 0.7842, p-value = 0.4329 alternative hypothesis: data have a skewness
> anscombe Anscombe-Glynn kurtosis test data: x kurt = 3.7592, z = 1.8711, p-value = 0.06134 alternative hypothesis: kurtosis is not equal to 3
> jarque Jarque-Bera Normality Test data: x JB = 5.4427, p-value = 0.06579 alternative hypothesis: greater
> geary [1] 0.7806217

\begin{tabular}{lllllllll}
\hline
Skewness and Kurtosis Test \tabularnewline
> agostino
	D'Agostino skewness test
data:  x
skew = 0.2165, z = 0.7842, p-value = 0.4329
alternative hypothesis: data have a skewness
 \tabularnewline
> anscombe
	Anscombe-Glynn kurtosis test
data:  x
kurt = 3.7592, z = 1.8711, p-value = 0.06134
alternative hypothesis: kurtosis is not equal to 3
 \tabularnewline
> jarque
	Jarque-Bera Normality Test
data:  x
JB = 5.4427, p-value = 0.06579
alternative hypothesis: greater
 \tabularnewline
> geary
[1] 0.7806217
 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=270094&T=1

[TABLE]
[ROW][C]Skewness and Kurtosis Test[/C][/ROW]
[ROW][C]> agostino
	D'Agostino skewness test
data:  x
skew = 0.2165, z = 0.7842, p-value = 0.4329
alternative hypothesis: data have a skewness
[/C][/ROW]
[ROW][C]> anscombe
	Anscombe-Glynn kurtosis test
data:  x
kurt = 3.7592, z = 1.8711, p-value = 0.06134
alternative hypothesis: kurtosis is not equal to 3
[/C][/ROW]
[ROW][C]> jarque
	Jarque-Bera Normality Test
data:  x
JB = 5.4427, p-value = 0.06579
alternative hypothesis: greater
[/C][/ROW]
[ROW][C]> geary
[1] 0.7806217
[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=270094&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=270094&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.2165, z = 0.7842, p-value = 0.4329 alternative hypothesis: data have a skewness
> anscombe Anscombe-Glynn kurtosis test data: x kurt = 3.7592, z = 1.8711, p-value = 0.06134 alternative hypothesis: kurtosis is not equal to 3
> jarque Jarque-Bera Normality Test data: x JB = 5.4427, p-value = 0.06579 alternative hypothesis: greater
> geary [1] 0.7806217

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