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

Fri, 23 Dec 2016 14:10:42 +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/23/t14824995472ux91i0gvmfc4ol.htm/, Retrieved Wed, 08 May 2024 02:07:10 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=302935, Retrieved Wed, 08 May 2024 02:07:10 +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] [] [2016-12-23 13:10:42] [8e62cbb8023b87d93040197279d31dd8] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

-0.119674416544362
-1.2450549365719
-1.23244433471217
1.30790827126443
1.20948241281955
1.80559083537745
1.44157342401413
-0.0612599385511935
1.17312952359567
1.0427017874741
0.100662442465355
1.90947079978085
0.0256403875064649
0.786773497633863
-0.79187319808136
0.6617995940124
-0.974598824964366
0.139688820853106
1.11523800679395
1.16578819604624
0.917183625813945
-1.02774403878696
-0.495313819428477
2.04914536794034
-0.816825738918989
0.314804229995915
-0.656108916619367
-1.73496248880003
2.65425437405061
0.427849967948113
-0.900143397335664
-0.529695971421035
0.38726438057771
2.54127152178279
0.407492867067053
-0.0740884912076537
1.60220963412373
0.821175279293522
-1.41526058292817
-0.67212500056963
0.167468962489227
1.52558066788428
0.43563170466575
-0.113544652800771
-0.662682391908132
1.66538064369683
-0.208976532793211
1.29384301051877
0.00386049365663801
0.351210754315221
-1.12274804323334
4.22475303823733
-1.01004066067026
0.0176686572492463
2.93068542227433
0.654810601551035
1.88053980862705
-0.102722439253246
-0.596158155665421
-0.987458624780075
-1.80693330399875
-0.8716713132348
-1.06995498649081
1.05473522848653
1.36505705645487
2.43950476595327
0.701505084745527
-0.421885237652541
-0.181009416535983
-2.47614318853498
1.06896972089709
0.255347879826023
-0.53285317401478
-0.804852425583787
1.52492365314007
0.404028401347959
0.507192257644832
-0.0509858295551438
0.383926818577598
0.434619003257549
-0.042291314201279
-1.84789561783062
-0.475598836698206
1.65122533982314
0.665612478635599
0.107510777662284
2.62813955602553
-1.64187168609857
1.68223631451145
-0.0880786076704655
-1.93529012079269
1.0970156409052
0.708376005580569
-0.0144862691526715
0.945708656929019
0.0436411692136322
-0.503107268247707
-0.495866542906712
-1.41632854989571
2.47950071525069
1.03789264432948
-0.0567835563599925
0.124933932183552

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=302935&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=302935&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=302935&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.36643, z = 1.57230, p-value = 0.1159 alternative hypothesis: data have a skewness
> anscombe Anscombe-Glynn kurtosis test data: x kurt = 3.21610, z = 0.76134, p-value = 0.4465 alternative hypothesis: kurtosis is not equal to 3
> jarque Jarque-Bera Normality Test data: x JB = 2.5054, p-value = 0.2857 alternative hypothesis: greater
> geary [1] 0.79408

\begin{tabular}{lllllllll}
\hline
Skewness and Kurtosis Test \tabularnewline
> agostino
	D'Agostino skewness test
data:  x
skew = 0.36643, z = 1.57230, p-value = 0.1159
alternative hypothesis: data have a skewness
 \tabularnewline
> anscombe
	Anscombe-Glynn kurtosis test
data:  x
kurt = 3.21610, z = 0.76134, p-value = 0.4465
alternative hypothesis: kurtosis is not equal to 3
 \tabularnewline
> jarque
	Jarque-Bera Normality Test
data:  x
JB = 2.5054, p-value = 0.2857
alternative hypothesis: greater
 \tabularnewline
> geary
[1] 0.79408
 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=302935&T=1

[TABLE]
[ROW][C]Skewness and Kurtosis Test[/C][/ROW]
[ROW][C]> agostino
	D'Agostino skewness test
data:  x
skew = 0.36643, z = 1.57230, p-value = 0.1159
alternative hypothesis: data have a skewness
[/C][/ROW]
[ROW][C]> anscombe
	Anscombe-Glynn kurtosis test
data:  x
kurt = 3.21610, z = 0.76134, p-value = 0.4465
alternative hypothesis: kurtosis is not equal to 3
[/C][/ROW]
[ROW][C]> jarque
	Jarque-Bera Normality Test
data:  x
JB = 2.5054, p-value = 0.2857
alternative hypothesis: greater
[/C][/ROW]
[ROW][C]> geary
[1] 0.79408
[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=302935&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=302935&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.36643, z = 1.57230, p-value = 0.1159 alternative hypothesis: data have a skewness
> anscombe Anscombe-Glynn kurtosis test data: x kurt = 3.21610, z = 0.76134, p-value = 0.4465 alternative hypothesis: kurtosis is not equal to 3
> jarque Jarque-Bera Normality Test data: x JB = 2.5054, p-value = 0.2857 alternative hypothesis: greater
> geary [1] 0.79408

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