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 computationTue, 18 Dec 2012 17:14:15 -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/18/t1355868867avoex5gm9czel4o.htm/, Retrieved Thu, 31 Oct 2024 23:57:58 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=201701, Retrieved Thu, 31 Oct 2024 23:57:58 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact151
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Skewness and Kurtosis Test] [skewness meervoud...] [2012-12-18 22:14:15] [5821104a6123eb5bf529ba8614395dc8] [Current]
-         [Skewness and Kurtosis Test] [skewness van de r...] [2012-12-21 20:28:47] [8cc09667e588c76c8c3bfb3e2ed3290a]
Feedback Forum

Post a new message
Dataseries X:
-2.716932667
0.695354701
2.465773394
3.756800929
-1.889687332
-1.342423946
4.161807991
-1.656841747
-1.614396605
1.160117737
1.47558678
0.038654809
1.034583103
0.869405423
-0.726605178
-0.007360227
0.966688731
3.960453337
2.905813838
0.813862378
0.998463167
1.416135174
2.773099012
1.361748946
1.158397864
1.165514867
1.470598801
-1.416929777
0.704482544
0.382605544
-0.36723147
-0.157794884
-0.467033523
0.450952519
-1.151997771
-2.454806771
-2.290802595
-1.44287535
1.88743235
1.949699309
1.640084339
-1.412909516
2.502440756
0.262000289
-0.139025784
-4.150559388
-2.419095997
0.218766088
0.808402277
-1.361515364
-0.853739839
0.268310726
-2.61386536
0.409310097
-1.713731807
2.167395395
0.30627631
0.769644429
0.176995441
2.206777551
1.163272051
0.562135982
-0.29898697
-0.438887734
0.84995573
1.256146159
1.909653498
3.923509508
-3.808460881
0.527152017
-3.012245827
-0.715665538
1.162010456
0.807171814
0.990531311
3.909747507
-0.407232544
1.787718277
-1.961485328
0.916861489
0.463901031
0.356770523
-0.620182287
0.313856292
2.117237372
0.048211388
0.766905814
1.318697005
0.896661826
-1.643303567
0.167875359
0.270514769
0.094207665
-1.836456819
1.301967194
0.303921953
2.516715321
0.169958299
-0.266125863
-1.194086507
1.494098871
2.420900716
0.977353986
1.161623748
-1.712444774
1.239562685
0.227935475
1.767395736
-0.002480266
0.82816145
0.061511967
2.137467172
-1.528640241
-2.614568461
1.723547556
-1.950475963
1.007537805
-1.785824239
0.485542044
-1.373030868
0.592730467
-2.900148395
-1.073803686
-0.998565253
-0.921755895
0.249852821
1.23278974
0.995768005
-2.745597967
2.098177534
-3.490018923
2.515270651
-2.131895571
-1.689160164
-0.134952532
1.120129701
0.459324011
-2.363957787
-0.99487178
-2.279773405
3.129332967
1.422202992
-0.012629669
1.782276715
-3.307648252
2.289181735
-2.057515845
1.0801914
0.362236196
-2.878325739
-1.155043271
2.007639148
4.295954949
1.750032454
-2.310629981
0.167875359
1.430460681
0.995768005
1.32860448
-0.573651755
0.399396308
0.533448646
-0.388160789
0.426210073
1.327399554
-1.420672833
-0.469161997
-3.29098658
-1.848292762
1.569125254
1.634688184
0.294051606
-1.988393653
-2.312033591
-3.288588788
0.255786884
-0.263297297
-0.687934672
-0.062106612
-1.476269705
0.565951923
-0.521748993
1.839536729
-0.520609608
-6.76628809
1.03190728
2.252323131
-0.541803289
-0.526967526
0.700677591
-1.044903908
0.145076363
2.342000107
1.699486741
-0.915984634
-0.368633528
2.901656852
0.687030247
1.512544799
1.229420219
1.804610223
0.434739187
-2.762297678
-2.916569977
2.030333482
0.16303558
1.152973504
0.56605129
-2.916763144
0.69684053
-2.507489607
-4.289684969
0.690829519
2.832504112
1.116710656
0.579212169
1.937338022
-0.32791694
1.009711098
-0.615891961
-2.022491333
-0.573303347
0.433554087
-1.45853137
0.19571926
-3.966868429
-0.309683138
0.726256447
-1.343269573
-1.160998557
1.520067648
-3.465040334
4.299546178
1.544133629
-1.305398824
-2.654920743
-7.170028137
-1.815214028
1.407636695
-1.928726129
-0.407197066
-1.795600382
1.113655299
1.72299312
0.907372684
-0.046770178
0.846117134
-2.890292844
1.19903418
0.116066371
-1.137919803
-1.862263458
0.336856218
2.821775236
-1.715206305
-0.26408786
1.318811443
2.176071319
-1.781640984
-5.483306743
0.825633349
-4.550209689
-0.471645252
0.832709147




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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=201701&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 Ronald Aylmer Fisher' @ fisher.wessa.net







Skewness and Kurtosis Test
> agostino
	D'Agostino skewness test
data:  x 
skew = -0.5764, z = -2.4213, p-value = 0.01547
alternative hypothesis: data have a skewness 
> anscombe
	Anscombe-Glynn kurtosis test
data:  x 
kurt = 3.8889, z = 2.4131, p-value = 0.01582
alternative hypothesis: kurtosis is not equal to 3 
> jarque
	Jarque-Bera Normality Test
data:  x 
JB = 23.3082, p-value = 8.683e-06
alternative hypothesis: greater 
> geary
[1] 0.7845596

\begin{tabular}{lllllllll}
\hline
Skewness and Kurtosis Test \tabularnewline
> agostino
	D'Agostino skewness test
data:  x 
skew = -0.5764, z = -2.4213, p-value = 0.01547
alternative hypothesis: data have a skewness 
\tabularnewline
> anscombe
	Anscombe-Glynn kurtosis test
data:  x 
kurt = 3.8889, z = 2.4131, p-value = 0.01582
alternative hypothesis: kurtosis is not equal to 3 
\tabularnewline
> jarque
	Jarque-Bera Normality Test
data:  x 
JB = 23.3082, p-value = 8.683e-06
alternative hypothesis: greater 
\tabularnewline
> geary
[1] 0.7845596
\tabularnewline \hline \end{tabular} %Source: https://freestatistics.org/blog/index.php?pk=201701&T=1

[TABLE]
[ROW][C]Skewness and Kurtosis Test[/C][/ROW]
[ROW][C]
> agostino
	D'Agostino skewness test
data:  x 
skew = -0.5764, z = -2.4213, p-value = 0.01547
alternative hypothesis: data have a skewness 
[/C][/ROW] [ROW][C]
> anscombe
	Anscombe-Glynn kurtosis test
data:  x 
kurt = 3.8889, z = 2.4131, p-value = 0.01582
alternative hypothesis: kurtosis is not equal to 3 
[/C][/ROW] [ROW][C]
> jarque
	Jarque-Bera Normality Test
data:  x 
JB = 23.3082, p-value = 8.683e-06
alternative hypothesis: greater 
[/C][/ROW] [ROW][C]
> geary
[1] 0.7845596
[/C][/ROW] [/TABLE] Source: https://freestatistics.org/blog/index.php?pk=201701&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=201701&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.5764, z = -2.4213, p-value = 0.01547
alternative hypothesis: data have a skewness 
> anscombe
	Anscombe-Glynn kurtosis test
data:  x 
kurt = 3.8889, z = 2.4131, p-value = 0.01582
alternative hypothesis: kurtosis is not equal to 3 
> jarque
	Jarque-Bera Normality Test
data:  x 
JB = 23.3082, p-value = 8.683e-06
alternative hypothesis: greater 
> geary
[1] 0.7845596



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