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 computationFri, 23 Dec 2011 10:41:18 -0500
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2011/Dec/23/t1324654917zfw40m12e4lwznb.htm/, Retrieved Mon, 29 Apr 2024 19:13:07 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=160512, Retrieved Mon, 29 Apr 2024 19:13:07 +0000
QR Codes:

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

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] [Skewness/Kurtosis] [2011-12-23 15:41:18] [a0aae37dd27f4b65e222573f53b5a13b] [Current]
Feedback Forum

Post a new message

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
1,959961185
2,876293978
-0,788255967
-0,895170087
-4,233509903
3,411323235
3,320270234
-2,051807687
-0,854222426
-0,890406017
0,534784709
-1,78635778
1,170651302
-1,529473531
3,591929663
1,881934928
-0,004981711
-0,329846494
-2,997454749
-2,76907181
-4,516583667
1,608173831
-0,678462529
-5,386404207
2,423431294
0,55124997
1,781717688
-0,685175421
4,265410247
-1,405747811
0,063945219
-2,32699155
-3,540933782
1,314957385
2,224683852
1,59972085
-0,790609805
2,949702172
4,16357536
0,546593426
1,388767885
-4,254352804
3,789079346
1,191860338
1,595328171
-1,561977928
-3,743594547
0,047756036
0,825273769
-2,63421777
1,6156615
0,447498089
-0,703475361
-1,111137275
1,459898827
-3,085232087
-1,212170412
-4,420961058
1,269101665
-2,427346394
1,852890028
0,739661184
3,767841783
0,369163646
-2,530000608
0,553430044
1,85763213
-1,671622394
-0,445591341
4,788852372
-3,86873489
1,295345856
0,228166941
-1,188005436
1,883048431
0,395270046
2,386110471
2,267075228
-3,046540079
-1,64482648
1,125707098
-3,895539497
0,522033489
1,540692466
0,463335931

Tables (Output of Computation)





Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time0 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=160512&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=160512&T=0

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






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

> anscombe
	Anscombe-Glynn kurtosis test
data:  x 
kurt = 2.3914, z = -1.3287, p-value = 0.184
alternative hypothesis: kurtosis is not equal to 3 

> jarque
	Jarque-Bera Normality Test
data:  x 
JB = 2.0297, p-value = 0.3625
alternative hypothesis: greater 

> geary
[1] 0.8263635


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

> agostino
	D'Agostino skewness test
data:  x 
skew = -0.2251, z = -0.5939, p-value = 0.5526
alternative hypothesis: data have a skewness 

 \tabularnewline

> anscombe
	Anscombe-Glynn kurtosis test
data:  x 
kurt = 2.3914, z = -1.3287, p-value = 0.184
alternative hypothesis: kurtosis is not equal to 3 

 \tabularnewline

> jarque
	Jarque-Bera Normality Test
data:  x 
JB = 2.0297, p-value = 0.3625
alternative hypothesis: greater 

 \tabularnewline

> geary
[1] 0.8263635

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

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

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

[/C][/ROW]
[ROW][C]
> jarque
	Jarque-Bera Normality Test
data:  x 
JB = 2.0297, p-value = 0.3625
alternative hypothesis: greater 

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

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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=160512&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.2251, z = -0.5939, p-value = 0.5526
alternative hypothesis: data have a skewness 

> anscombe
	Anscombe-Glynn kurtosis test
data:  x 
kurt = 2.3914, z = -1.3287, p-value = 0.184
alternative hypothesis: kurtosis is not equal to 3 

> jarque
	Jarque-Bera Normality Test
data:  x 
JB = 2.0297, p-value = 0.3625
alternative hypothesis: greater 

> geary
[1] 0.8263635


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