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, 21 Nov 2018 12:00:00 +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/2018/Nov/21/t1542798110rgr27qz1zdpfuae.htm/, Retrieved Fri, 03 May 2024 15:58:22 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=315681, Retrieved Fri, 03 May 2024 15:58:22 +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

149

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)

-       [Skewness and Kurtosis Test] [] [2018-11-21 11:00:00] [1a08508141e24091120553b77b30ae8d] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

-0.0742990428851862
-0.499608151198536
-0.288650897980499
-0.512614793616626
-1.2134048270068
-0.407673860329972
-1.18816936827407
-0.701625586478266
-0.347209859852903
1.73974493362225
3.2733358616238
-0.345126696350356
1.00853927644891
0.852274321843296
-0.230645639677993
0.183978366614244
-0.170989961087947
-0.363192023418688
0.357302501231285
0.904451938516135
-1.1358520885764
-1.23710407143904
0.345995468151095
0.0861483297093585
0.034869272682372
-0.238396404508286
-0.0504954140354477
0.0942708410975082
-0.0590118463463653
-0.299731489126172
0.746521249113814
-0.85987542255669
-0.143907490728628
-0.26199181187565
-0.0535249518972602
-0.381130755427157
-0.0924206845231367
-0.308027093353617
-0.528447950874448
0.50143556940822
-3.02366715348145
-0.0295032716023071
-0.542784519951094
-0.337380792828461
-0.125894383611814
-0.249724923433333
1.02192291282619
0.0108390792975499
-0.0809942755701561
-0.260975102945797
-1.79771422427037
-1.32739208355122
0.0288567843015146
-0.55127056383371
-1.37946648631443
-0.244605518571028
-0.578127600359661
-0.234625449162058
0.0715468943185901
-0.0474080837232836
0.00971391854603341
-0.173643458072221
-0.243407815773484
-0.364843612354871
-0.297561278856935
-0.545404554647471
0.0564858564679123
0.163096181176679
-1.82087085431218
0.847992902284107
-1.2169105178582
-0.288533069832661
-0.864703232893688
-0.345314318333095
2.61887880849223
-0.340998663203499
1.03182449641808
2.85448394175648
0.0541985628336084
-0.526393016488424
-0.58772532707986
0.763424472325178
0.147619576969454
0.0223129666893674
0.845408499082152
-0.186757830479232
3.7378939085464
0.616213127647594
-0.342441074203538
-0.0793800062490641
0.228952889700957
-0.00474832572248148
0.0960159933797391
0.221430482414797
-0.0651476343625557
-0.0141972305768593
0.775212527555792
0.35431500526749
-0.260203806611413
0.0749062198334509
-0.429190001499058
-0.106496346619434
-0.35631188891832
-1.88073798182388
-1.24703355698014
-0.418276698573299
0.241878745267018
-0.31779503240343
3.08065596319932
-0.154851326914219
-0.312616416434839
-0.124195479863061
-0.184218417908337
-0.787905547281711
-0.676430144864344
0.320392298496773
-0.734700869059216
1.75987492170184
-0.407598145243497
1.70694426677705
-0.247200351615485
1.40385551013276
-0.0101302700352682
-0.286375415472093
-0.219885872543212
1.30331985298941
0.0157261749923816
0.0724202765483426
0.0152088486483249
0.867209093726498
0.225225814091803
1.10620192757465
-0.460966874957359
0.962037217324304
-1.35727536034256
-0.807266242387988
1.10451676782652
-0.064793203278877
-1.57468971969034
-3.11039700471274
-0.648847213141698
-0.258816539537933
0.134140226189603
-0.935509763224318
0.0285019926938585
-0.445440354095975
4.5116763329018
-0.212817618498202
0.0674441733874602
2.86551226541872
-0.238739810656602
0.568911569939287
-1.10824937019374
2.36630540998788
1.02046844980242
-1.2392717546469
0.420483301875487
0.277998375909949
-0.173566032500243
-0.00568841763961335
-0.47614523273616
0.164954805245052

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	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 time1 seconds \tabularnewline
R ServerBig Analytics Cloud Computing Center \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=315681&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]

1 seconds[/C][/ROW] [ROW]

R Server[/C]

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

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

Skewness and Kurtosis Test
> agostino D'Agostino skewness test data: x skew = 1.1920, z = 5.2818, p-value = 1.279e-07 alternative hypothesis: data have a skewness
> anscombe Anscombe-Glynn kurtosis test data: x kurt = 7.2273, z = 4.7316, p-value = 2.227e-06 alternative hypothesis: kurtosis is not equal to 3
> jarque Jarque-Bera Normality Test data: x JB = 158.99, p-value < 2.2e-16 alternative hypothesis: greater
> geary [1] 0.6394748

\begin{tabular}{lllllllll}
\hline
Skewness and Kurtosis Test \tabularnewline
> agostino
	D'Agostino skewness test
data:  x
skew = 1.1920, z = 5.2818, p-value = 1.279e-07
alternative hypothesis: data have a skewness
 \tabularnewline
> anscombe
	Anscombe-Glynn kurtosis test
data:  x
kurt = 7.2273, z = 4.7316, p-value = 2.227e-06
alternative hypothesis: kurtosis is not equal to 3
 \tabularnewline
> jarque
	Jarque-Bera Normality Test
data:  x
JB = 158.99, p-value < 2.2e-16
alternative hypothesis: greater
 \tabularnewline
> geary
[1] 0.6394748
 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=315681&T=1

[TABLE]
[ROW][C]Skewness and Kurtosis Test[/C][/ROW]
[ROW][C]> agostino
	D'Agostino skewness test
data:  x
skew = 1.1920, z = 5.2818, p-value = 1.279e-07
alternative hypothesis: data have a skewness
[/C][/ROW]
[ROW][C]> anscombe
	Anscombe-Glynn kurtosis test
data:  x
kurt = 7.2273, z = 4.7316, p-value = 2.227e-06
alternative hypothesis: kurtosis is not equal to 3
[/C][/ROW]
[ROW][C]> jarque
	Jarque-Bera Normality Test
data:  x
JB = 158.99, p-value < 2.2e-16
alternative hypothesis: greater
[/C][/ROW]
[ROW][C]> geary
[1] 0.6394748
[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=315681&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=315681&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.1920, z = 5.2818, p-value = 1.279e-07 alternative hypothesis: data have a skewness
> anscombe Anscombe-Glynn kurtosis test data: x kurt = 7.2273, z = 4.7316, p-value = 2.227e-06 alternative hypothesis: kurtosis is not equal to 3
> jarque Jarque-Bera Normality Test data: x JB = 158.99, p-value < 2.2e-16 alternative hypothesis: greater
> geary [1] 0.6394748

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