Free Statistics

of Irreproducible Research!

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 computationWed, 19 Dec 2012 10:26:40 -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/2012/Dec/19/t1355930841vh14lf3tpz6ykdu.htm/, Retrieved Fri, 03 May 2024 20:25:38 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=202072, Retrieved Fri, 03 May 2024 20:25:38 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact66
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Skewness and Kurtosis Test] [regression] [2012-12-19 15:26:40] [5821104a6123eb5bf529ba8614395dc8] [Current]
Feedback Forum

Post a new message
Dataseries X:
-0.513675191
0.650740662
2.491533689
3.775801377
-1.869744335
-1.357162846
4.075455594
-1.649456434
-1.642527792
1.140912086
1.431532099
-0.0336394
0.978302472
0.782586988
-0.693710168
-0.020352646
0.942727768
3.947652617
2.833676079
0.79651274
0.996799278
1.431268691
2.679582587
1.304718676
1.117292366
1.080947706
1.447522882
-1.409873161
0.717660481
0.368112179
-0.337131896
-0.119919416
-0.517440299
0.474203724
-1.166852244
-2.444767181
-2.254745168
-1.477930118
1.935541994
1.920205449
1.595504471
-1.415547903
2.399029166
0.203955174
-0.209496404
-4.199725131
-2.47838914
0.227178245
0.793708671
-1.415631293
-0.837382111
0.268174415
-2.613298211
0.398968123
-1.719248242
2.148348231
0.248452334
0.802417934
0.136402806
2.190013072
1.16523946
0.516535292
-0.294191476
-0.449074654
0.800688648
1.254257489
1.875470078
3.943035776
-3.876876651
0.511023848
-3.061166842
-0.71229478
1.179612451
0.754488972
0.988008711
3.868745785
-0.445232054
1.778185988
-1.897961625
0.818554473
0.480542754
0.338065786
-0.663232413
0.328796095
2.127585741
0.016435602
0.762906907
1.329458706
0.907597941
-1.604646944
0.097478993
0.276076208
0.118208534
-1.783643324
1.257589778
0.263727121
2.502984509
0.143922475
-0.241671786
-1.241333647
1.463994624
2.419502727
0.966441015
1.195394802
-1.790283752
1.196323227
0.156803225
1.707023812
-0.119467456
0.893753766
0.088028886
2.198028536
-1.593320804
-2.643827153
1.702323429
-1.970088499
1.01107611
-1.791677157
0.478163815
-1.395354174
0.612489445
-2.91031165
-1.107853619
-1.035791981
-0.892559839
0.214791652
1.125310085
1.028151817
-2.7641706
2.106262652
-3.435981075
2.457151234
-2.078570876
-1.717629066
-0.100265182
1.138133643
0.442961633
-2.352402622
-1.026265227
-2.257344641
3.108188841
1.495636605
0.049906442
1.794591519
-3.349888516
2.296315809
-2.106525506
1.091104269
0.355710915
-2.886622966
-1.226451365
2.00172466
4.293104556
1.706987149
-2.283771157
0.097478993
1.455736032
1.028151817
1.33528523
-0.514784793
0.404398335
0.59805555
-0.356391484
0.403226471
1.339056676
-1.340735869
-0.422039546
-3.224466874
-1.823802677
1.650318072
1.5739611
0.270056176
-2.060568978
-2.297045951
-3.329369815
0.274912849
-0.303840927
-0.654789591
-0.054133827
-1.516639203
0.501028585
-0.55793084
1.860248166
-0.566018173
-6.620636972
1.066354652
2.227657761
-0.576418358
-0.51218501
0.720858997
-1.109245046
0.104957013
2.36378505
1.676022478
-0.900468521
-0.405835226
2.916310359
0.73075078
1.505038321
1.313018136
1.834486847
0.522696129
-2.772306196
-2.960595418
2.03512915
0.165486268
1.170209345
0.514916729
-2.946869062
0.712013205
-2.526839238
-4.330184341
0.756101988
2.883971517
1.095199698
0.610120034
1.968660564
-0.365857371
0.977094647
-0.61039575
-2.037960996
-0.652225454
0.438771886
-1.439306247
0.126005825
-3.934354621
-0.32313878
0.708290966
-1.344024314
-1.167218751
1.508076263
-3.453795283
4.287885889
1.463806363
-1.320218704
-2.691012244
-7.192858063
-1.900949715
1.443601531
-1.973828473
-0.310426253
-1.83902347
1.147424993
1.702183266
0.888972224
0.013135812
0.863530902
-2.95692437
1.316241995
0.191030019
-1.108394601
-1.838271162
0.309985188
2.826114746
-1.754274962
-0.277123686
1.32160328
2.191874556
-1.826882298
-5.484892912
0.869851038
-4.559117135
-0.540890699
0.877717749




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time1 seconds
R Server'Sir Maurice George Kendall' @ kendall.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 & 1 seconds \tabularnewline
R Server & 'Sir Maurice George Kendall' @ kendall.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=202072&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]1 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'Sir Maurice George Kendall' @ kendall.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=202072&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=202072&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 Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time1 seconds
R Server'Sir Maurice George Kendall' @ kendall.wessa.net







Skewness and Kurtosis Test
> agostino
	D'Agostino skewness test
data:  x 
skew = -0.5794, z = -2.4324, p-value = 0.015
alternative hypothesis: data have a skewness 
> anscombe
	Anscombe-Glynn kurtosis test
data:  x 
kurt = 3.8938, z = 2.4221, p-value = 0.01543
alternative hypothesis: kurtosis is not equal to 3 
> jarque
	Jarque-Bera Normality Test
data:  x 
JB = 23.5584, p-value = 7.662e-06
alternative hypothesis: greater 
> geary
[1] 0.783264

\begin{tabular}{lllllllll}
\hline
Skewness and Kurtosis Test \tabularnewline
> agostino
	D'Agostino skewness test
data:  x 
skew = -0.5794, z = -2.4324, p-value = 0.015
alternative hypothesis: data have a skewness 
\tabularnewline
> anscombe
	Anscombe-Glynn kurtosis test
data:  x 
kurt = 3.8938, z = 2.4221, p-value = 0.01543
alternative hypothesis: kurtosis is not equal to 3 
\tabularnewline
> jarque
	Jarque-Bera Normality Test
data:  x 
JB = 23.5584, p-value = 7.662e-06
alternative hypothesis: greater 
\tabularnewline
> geary
[1] 0.783264
\tabularnewline \hline \end{tabular} %Source: https://freestatistics.org/blog/index.php?pk=202072&T=1

[TABLE]
[ROW][C]Skewness and Kurtosis Test[/C][/ROW]
[ROW][C]
> agostino
	D'Agostino skewness test
data:  x 
skew = -0.5794, z = -2.4324, p-value = 0.015
alternative hypothesis: data have a skewness 
[/C][/ROW] [ROW][C]
> anscombe
	Anscombe-Glynn kurtosis test
data:  x 
kurt = 3.8938, z = 2.4221, p-value = 0.01543
alternative hypothesis: kurtosis is not equal to 3 
[/C][/ROW] [ROW][C]
> jarque
	Jarque-Bera Normality Test
data:  x 
JB = 23.5584, p-value = 7.662e-06
alternative hypothesis: greater 
[/C][/ROW] [ROW][C]
> geary
[1] 0.783264
[/C][/ROW] [/TABLE] Source: https://freestatistics.org/blog/index.php?pk=202072&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=202072&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.5794, z = -2.4324, p-value = 0.015
alternative hypothesis: data have a skewness 
> anscombe
	Anscombe-Glynn kurtosis test
data:  x 
kurt = 3.8938, z = 2.4221, p-value = 0.01543
alternative hypothesis: kurtosis is not equal to 3 
> jarque
	Jarque-Bera Normality Test
data:  x 
JB = 23.5584, p-value = 7.662e-06
alternative hypothesis: greater 
> geary
[1] 0.783264



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