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, 07 Dec 2016 15:59:32 +0100

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/2016/Dec/07/t1481122811xylqysaj78j74yx.htm/, Retrieved Tue, 07 May 2024 18:10:40 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=298182, Retrieved Tue, 07 May 2024 18:10:40 +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] [N1895] [2016-12-07 14:59:32] [85f5800284aab30c091766186b093bb4] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

-4.30299949462346e-11 
-3.5692905518067e-09 
1.18012356665809e-09 
4.52200125142426e-09 
-2.80250858694921e-09 
1.22350443654643e-09 
1.15361376736491e-09 
9.05041507743355e-09 
5.74534406049901e-10 
2.28898980412212e-10 
-1.21155071462314e-09 
7.1610342986153e-10 
-3.01440342413111e-09 
-5.98412131158485e-09 
4.92111026798783e-09 
2.69519192029147e-09 
-4.69758921267779e-09 
9.91522897313425e-10 
1.65226064211075e-10 
6.51677136200404e-09 
-1.91115861883073e-10 
2.00628958468312e-09 
1.0648781477171e-09 
3.72561443990811e-09 
7.27246859729633e-10 
-6.8201262514399e-09 
-6.14002187706393e-10 
1.68950102282039e-10 
-4.3453000871515e-09 
1.39799684278156e-09 
-2.0246577875774e-09 
5.91369059142489e-09 
1.60827174626079e-09 
6.65146052353512e-10 
6.85382175938971e-10 
2.23514128970909e-09 
-7.79174860203693e-10 
-9.54938467362264e-09 
9.82734766059608e-10 
-2.03991182239581e-10 
-4.20001309736266e-09 
2.77587568523299e-09 
-3.19477444187263e-11 
9.70693718363697e-09 
2.14054042229037e-09 
1.96265348999556e-09 
-3.97576963320738e-09 
3.08791378894925e-09 
-1.92531936273936e-09 
-6.59153609435962e-09 
2.5402219123152e-09 
2.05549002298521e-09 
-3.08663146463887e-09 
-2.02876638472031e-09 
-3.3781331067019e-09 
8.94675182230948e-09 
1.24450951848696e-09 
7.3569823402005e-10 
-8.67788726769823e-10 
2.93543317994635e-09 
-2.31440635028182e-09 
-6.32018416851625e-09 
-4.76407358321231e-10 
7.45924421842782e-10 
-1.37022477164472e-09 
-2.15201402209945e-09 
-1.79167620361628e-09 
9.03713654173066e-09 
1.10813764684504e-09 
1.60510788145743e-09 
8.12403414061903e-10 
2.35068351257886e-09 
-1.12669487641071e-09 
-6.52379643258134e-09 
3.06703166549583e-10 
3.69825689051167e-10 
-3.38902984819362e-09 
-1.47433119655669e-09 
-1.65667628874948e-09 
7.1463438561365e-09 
3.68702848082979e-10 
1.50488961295211e-09 
2.55362083039322e-09 
2.49905514873015e-09 
-9.09049739657761e-11 
-7.21845576073239e-09 
9.59728186994039e-10 
1.58161857516309e-10 
-5.55754527037912e-09 
-6.91878988080537e-10 
-1.45897688745307e-09 
7.60989836834815e-09 
7.78512148039019e-10 
8.94589107928633e-10 
1.55267185630418e-09 
2.66407790150841e-09 
-1.19162949062935e-09 
-4.0665403923451e-09 
7.26829830761019e-10 
1.17438595458801e-09 
-4.82417596952334e-09 
-1.34563658866201e-09 
-1.91831236182188e-09 
7.22317118690442e-09 
1.77597291179119e-09 
1.10627708318188e-09 
2.89297424118172e-10 
2.60874278846856e-09 
1.51847746965352e-09 
-3.54605739036668e-09 
-3.50521433403097e-09 
-6.93708723894827e-10 
-2.63704244059212e-09 
-1.46143268808445e-09 
-2.0318875708464e-09 
6.43763611672062e-09 
1.27209516133363e-09 
2.78820801000598e-09 
-2.5129884618698e-09 
4.94861557338428e-09 
7.24602738684084e-10 
-5.31824406542557e-09 
1.57281333409673e-09 
-9.38598766016107e-10 
-6.04150344204109e-09

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	Big Analytics Cloud Computing Center

\begin{tabular}{lllllllll}
\hline
Summary of computational transaction \tabularnewline
Raw Input view raw input (R code)  \tabularnewline
Raw Outputview raw output of R engine  \tabularnewline
Computing time0 seconds \tabularnewline
R ServerBig Analytics Cloud Computing Center \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=298182&T=0

[TABLE]
[ROW]

Summary of computational transaction[/C][/ROW] [ROW]

Raw Input[/C]

view raw input (R code) [/C][/ROW] [ROW]

Raw Output[/C]

view raw output of R engine [/C][/ROW] [ROW]

Computing time[/C]

0 seconds[/C][/ROW] [ROW]

R Server[/C]

Big Analytics Cloud Computing Center[/C][/ROW] [/TABLE] Source: https://freestatistics.org/blog/index.php?pk=298182&T=0

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

Skewness and Kurtosis Test
> agostino D'Agostino skewness test data: x skew = 0.20520, z = 0.97759, p-value = 0.3283 alternative hypothesis: data have a skewness
> anscombe Anscombe-Glynn kurtosis test data: x kurt = 3.6197, z = 1.4970, p-value = 0.1344 alternative hypothesis: kurtosis is not equal to 3
> jarque Jarque-Bera Normality Test data: x JB = 2.8772, p-value = 0.2373 alternative hypothesis: greater
> geary [1] 0.743817

\begin{tabular}{lllllllll}
\hline
Skewness and Kurtosis Test \tabularnewline
> agostino
	D'Agostino skewness test
data:  x
skew = 0.20520, z = 0.97759, p-value = 0.3283
alternative hypothesis: data have a skewness
 \tabularnewline
> anscombe
	Anscombe-Glynn kurtosis test
data:  x
kurt = 3.6197, z = 1.4970, p-value = 0.1344
alternative hypothesis: kurtosis is not equal to 3
 \tabularnewline
> jarque
	Jarque-Bera Normality Test
data:  x
JB = 2.8772, p-value = 0.2373
alternative hypothesis: greater
 \tabularnewline
> geary
[1] 0.743817
 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=298182&T=1

[TABLE]
[ROW][C]Skewness and Kurtosis Test[/C][/ROW]
[ROW][C]> agostino
	D'Agostino skewness test
data:  x
skew = 0.20520, z = 0.97759, p-value = 0.3283
alternative hypothesis: data have a skewness
[/C][/ROW]
[ROW][C]> anscombe
	Anscombe-Glynn kurtosis test
data:  x
kurt = 3.6197, z = 1.4970, p-value = 0.1344
alternative hypothesis: kurtosis is not equal to 3
[/C][/ROW]
[ROW][C]> jarque
	Jarque-Bera Normality Test
data:  x
JB = 2.8772, p-value = 0.2373
alternative hypothesis: greater
[/C][/ROW]
[ROW][C]> geary
[1] 0.743817
[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=298182&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=298182&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.20520, z = 0.97759, p-value = 0.3283 alternative hypothesis: data have a skewness
> anscombe Anscombe-Glynn kurtosis test data: x kurt = 3.6197, z = 1.4970, p-value = 0.1344 alternative hypothesis: kurtosis is not equal to 3
> jarque Jarque-Bera Normality Test data: x JB = 2.8772, p-value = 0.2373 alternative hypothesis: greater
> geary [1] 0.743817

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