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:56:35 +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/t1418817405jokivh4zqi8xxqz.htm/, Retrieved Thu, 16 May 2024 15:28:48 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=270087, Retrieved Thu, 16 May 2024 15:28:48 +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:56:35] [f235c2d73cdbd6a2c0ce149cb9653e7d] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

-0.44911
-0.0603941
0.320312
0.282686
-0.0789039
-0.125889
-0.0567253
0.11226
0.212831
-0.573041
-0.0820153
0.299315
-0.482605
-0.24096
-0.259501
-1.45901
0.0851627
-0.252418
-0.206735
0.0300532
0.240785
0.140927
-0.27159
-0.11683
0.162926
-0.10753
0.153448
-0.044882
0.429544
0.0490006
0.225302
0.0708083
0.189129
0.0245046
-0.267392
-0.196878
0.281102
-0.295577
0.261044
-0.0280162
-0.121498
0.395953
0.424944
-0.00999153
0.18946
0.0247902
0.412486
0.107579
0.306785
0.104514
0.0411323
0.164579
0.302856
0.265309
0.271636
-0.616974
-0.027583
0.0135648
-0.304078
-0.245594
-0.652356
-0.262098
-0.493305
0.352131
0.67415
0.328984
-0.346267
-0.148539
-0.036471
-0.0231718
0.199876
-0.162593
0.0520769
0.135189
-0.459435
0.236786
-0.0211022
-0.046283
0.0554439
-0.225148
0.0454748
0.351396
0.308823
0.163381
0.0526307
0.0675878
-0.328291
0.230255
-0.0875792
-0.110775
0.41348
0.132141
-0.272308
0.166411
-0.204908
-0.235169
-0.110754
0.409488
-0.184432
-0.277739
0.130478
0.131222
0.326081
-0.0952324
-0.275514
-0.178414
0.0929358
0.338539
-0.276853
0.346019
-0.233718
-0.0192351
0.346025
0.0731134
-0.00743165

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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=270087&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	0 seconds
R Server	'Herman Ole Andreas Wold' @ wold.wessa.net

Skewness and Kurtosis Test
> agostino D'Agostino skewness test data: x skew = -1.1659, z = -2.9480, p-value = 0.003198 alternative hypothesis: data have a skewness
> anscombe Anscombe-Glynn kurtosis test data: x kurt = 7.1911, z = 4.2104, p-value = 2.55e-05 alternative hypothesis: kurtosis is not equal to 3
> jarque Jarque-Bera Normality Test data: x JB = 110.2226, p-value < 2.2e-16 alternative hypothesis: greater
> geary [1] 0.7648518

\begin{tabular}{lllllllll}
\hline
Skewness and Kurtosis Test \tabularnewline
> agostino
	D'Agostino skewness test
data:  x
skew = -1.1659, z = -2.9480, p-value = 0.003198
alternative hypothesis: data have a skewness
 \tabularnewline
> anscombe
	Anscombe-Glynn kurtosis test
data:  x
kurt = 7.1911, z = 4.2104, p-value = 2.55e-05
alternative hypothesis: kurtosis is not equal to 3
 \tabularnewline
> jarque
	Jarque-Bera Normality Test
data:  x
JB = 110.2226, p-value < 2.2e-16
alternative hypothesis: greater
 \tabularnewline
> geary
[1] 0.7648518
 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=270087&T=1

[TABLE]
[ROW][C]Skewness and Kurtosis Test[/C][/ROW]
[ROW][C]> agostino
	D'Agostino skewness test
data:  x
skew = -1.1659, z = -2.9480, p-value = 0.003198
alternative hypothesis: data have a skewness
[/C][/ROW]
[ROW][C]> anscombe
	Anscombe-Glynn kurtosis test
data:  x
kurt = 7.1911, z = 4.2104, p-value = 2.55e-05
alternative hypothesis: kurtosis is not equal to 3
[/C][/ROW]
[ROW][C]> jarque
	Jarque-Bera Normality Test
data:  x
JB = 110.2226, p-value < 2.2e-16
alternative hypothesis: greater
[/C][/ROW]
[ROW][C]> geary
[1] 0.7648518
[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=270087&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=270087&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 = -1.1659, z = -2.9480, p-value = 0.003198 alternative hypothesis: data have a skewness
> anscombe Anscombe-Glynn kurtosis test data: x kurt = 7.1911, z = 4.2104, p-value = 2.55e-05 alternative hypothesis: kurtosis is not equal to 3
> jarque Jarque-Bera Normality Test data: x JB = 110.2226, p-value < 2.2e-16 alternative hypothesis: greater
> geary [1] 0.7648518

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