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 computationSat, 10 Dec 2011 11:28:55 -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/2011/Dec/10/t1323534550675mbrx8j4hf2kf.htm/, Retrieved Sun, 05 May 2024 03:25:09 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=153594, Retrieved Sun, 05 May 2024 03:25:09 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact124
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Multiple Regression] [Multiple Regression] [2011-12-10 11:44:02] [4fa66579543b578a51dd12826fe0c6d2]
-    D  [Multiple Regression] [Multiple Regression] [2011-12-10 12:52:41] [4fa66579543b578a51dd12826fe0c6d2]
- RM D      [Skewness and Kurtosis Test] [Skewness & Kurtosis] [2011-12-10 16:28:55] [03e2d80b807f43987d5267414f2021cf] [Current]
Feedback Forum

Post a new message
Dataseries X:
-18.3472554888036
21.8411545043334
1.94131149188994
3.06446453577127
-10.9817234128314
13.1762980044993
-57.480588180001
-12.1693035028418
-9.02893484978586
-2.87560000384019
-18.487997001154
23.4447011937956
63.431553720839
19.7262838348708
14.9528993694551
-10.3255169168221
41.6644069163984
-9.16222084130529
-37.2619574728934
-25.8383755783035
23.656770115883
10.6976215318755
-12.8546260061666
5.61862190870751
67.7559556726568
33.7099653223812
25.1492304332054
-7.86732856651091
22.3455548816274
22.3508372349001
10.5852248234667
21.549385193819
33.4463435779078
45.3156396309487
49.3307717528811
-1.92612824107369
-12.4339926459197
5.68533133778634
7.7494416818379
-21.1110924198331
-8.2259727021421
-17.5072369178776
-10.9300620531521
10.3752832635521
-11.8648917322356
18.8522398009412
5.46196648241639
7.12042415676524
17.0220897799982
-38.1675060017719
-19.5642610212543
18.2550088004785
43.6352522916981
-0.907928741250495
30.1761488656282
14.2298140074674
-19.4136745014387
4.56175439376469
15.9209443943803
-11.6328046515688
-3.06138929771845
35.6802283814724
-57.0261149006048
-0.799167197442603
-23.2076056822506
3.91458088073465
8.20672440984913
-8.9942640607071
-69.9276838611892
-1.81343211249722
15.5635377593447
-1.54821438880418
-10.2610544225243
10.4344580610578
26.7869025691798
-9.09080064327698
-2.40359602621524
51.5971085000225
23.5661301080828
60.8776779867316
-18.8507469458476
38.769926605858
-0.493805289714407
-6.22353125429556
-34.4343411938824
32.9648088681874
21.24824681254
7.11927888040566
-22.9759917279972
34.6497510600793
-27.3515962239552
-32.6853478648039
18.4835759034276
21.114520962863
18.3150947451347
-3.97957384446414
-1.59948054918699
25.7898486308487
-10.573786589234
13.2192845099626
3.13243666273028
29.5612434883818
-11.8602478142646
5.26443867280085
-17.2638350508333
-47.2289986393519
75.5623165972809
-11.0564884262696
-72.2387181522382
30.2165779801266
-19.0730033077861
-14.1130029507274
16.9664499520742
-38.5649718945339
-33.4574978264978
-4.51551922501207
-0.148275252869555
-19.6579985578717
-41.7913542448915
-11.0577969791679
-8.50038001683127
-12.1478308008691
5.61661070580364
0.386305421605932
0.00654459540917419
-6.802097118893
-12.6303374738841
20.5565417555207
-3.24294836395067
-25.0015328118681
-4.8776420344965
2.92631124019649
-12.5834301173819
28.1513933386787
31.3693266939552
-47.6725198147632
-23.8925955570555
-41.4463404724277
-12.8029732693732
-24.4927935486996
0.301133789515378
-14.8449108782798
5.05372402754382
13.4009445202507
39.000940361025
2.75987438106259
40.3151453980178
-11.6028456879744
-9.89409611288635
41.4823153470578
35.4745724875979
44.3418128364264
-17.1392582771747
11.5478495228229
3.80781737461359
-20.3998222091219
31.8848218694971
-11.9271942373356
18.9985759295609
16.6031945558762
-0.247456429167358
25.4986028893473
-8.61594772242585
-7.72512796060404
14.8962631997414
20.470772995878
10.7410407218897
-42.4999081150008
-8.67435340875801
-40.5791329331308
-23.0547153573788
-11.7135626095208
11.1589280509275
0.515811911267503
57.92602731971
-17.4084323427727
-10.4148903408043
8.51114214341662
9.8002750210583
-12.9588575247091
-27.1182978527389
-1.14331803310468
-24.70204608064
-12.1826161129175
-17.9292046360694
-21.7989095618193
-18.6470919636876
-20.4836462759463
-4.04893584992517
-3.98749183281087
-33.5323378229951
-0.966457696249048
-12.9534614896775
23.0771603926872
11.5259277703952
-16.8318769505556
23.5436772880304
-14.9914145784493
-16.2963678483275
-0.174767694873481
0.632773366910968
9.23475052462576
-0.449589647859677
6.61262770945114
7.07725256625598
2.62774625740101
8.12558736074492
-12.9428261054994
-5.25863713039864
31.2567541101292
-21.9537791586826
-5.05419677922152
8.92239780116223
14.0747032188813
14.6484683363915
45.6447901711659
2.42288095853275
-6.34207690355982
-0.818511129601041
13.4383104139307
20.5053023453134
14.487502848273
-4.76592392726873
9.96683484119699
13.646905382173
-28.2898791313897
-45.5527769428723
8.65771041061359
-9.00172187961303
20.239059354479
20.3724331159715
-7.74506885649025
-9.49264589262374
-1.74931758627858
-6.95076368154019
6.77204137596447
-7.30647909440663
-22.9539746533088
-2.90502783749989
7.94092109026678
-19.6525842098968
8.00263727939827
5.40290814517031
3.4108115332516
0.128867151954736
-10.5156422871781
-13.7567386412394
2.02079343224868
-16.2225226863954
-34.1315518861043
3.53200270158772
8.03831515353832
-25.6361215499347
11.8390165128938
9.77610691885841
-22.6799993544108
-11.2960851164815
-8.0980592818196
0.684381749941451
-13.7942405864085
-9.52533994704161
21.0957980090361
-14.2047132668961
-9.30318908049579
9.80245428920579
-12.4710178701786
15.954997151687
-19.7687861843889
3.61425312282708
-13.4339618608886
-5.49720876446808
16.1046362591557
-25.4915647649398
-1.22638057976329
-15.35612837253
-2.11114923413006
-9.37398112400413
-21.9715959127732
1.78056713821058
17.3234115962844
21.1612869002687
-35.0413877434668
-27.8012755394628
-22.4632340625462
14.2312339988766
-6.73336955206085
0.759825560877368
2.85858083342672
-2.91845527687566




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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=153594&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'George Udny Yule' @ yule.wessa.net







Skewness and Kurtosis Test
> agostino
	D'Agostino skewness test
data:  x 
skew = 0.1795, z = 0.8347, p-value = 0.4039
alternative hypothesis: data have a skewness 
> anscombe
	Anscombe-Glynn kurtosis test
data:  x 
kurt = 3.9018, z = 2.5122, p-value = 0.012
alternative hypothesis: kurtosis is not equal to 3 
> jarque
	Jarque-Bera Normality Test
data:  x 
JB = 11.3431, p-value = 0.003443
alternative hypothesis: greater 
> geary
[1] 0.7660844

\begin{tabular}{lllllllll}
\hline
Skewness and Kurtosis Test \tabularnewline
> agostino
	D'Agostino skewness test
data:  x 
skew = 0.1795, z = 0.8347, p-value = 0.4039
alternative hypothesis: data have a skewness 
\tabularnewline
> anscombe
	Anscombe-Glynn kurtosis test
data:  x 
kurt = 3.9018, z = 2.5122, p-value = 0.012
alternative hypothesis: kurtosis is not equal to 3 
\tabularnewline
> jarque
	Jarque-Bera Normality Test
data:  x 
JB = 11.3431, p-value = 0.003443
alternative hypothesis: greater 
\tabularnewline
> geary
[1] 0.7660844
\tabularnewline \hline \end{tabular} %Source: https://freestatistics.org/blog/index.php?pk=153594&T=1

[TABLE]
[ROW][C]Skewness and Kurtosis Test[/C][/ROW]
[ROW][C]
> agostino
	D'Agostino skewness test
data:  x 
skew = 0.1795, z = 0.8347, p-value = 0.4039
alternative hypothesis: data have a skewness 
[/C][/ROW] [ROW][C]
> anscombe
	Anscombe-Glynn kurtosis test
data:  x 
kurt = 3.9018, z = 2.5122, p-value = 0.012
alternative hypothesis: kurtosis is not equal to 3 
[/C][/ROW] [ROW][C]
> jarque
	Jarque-Bera Normality Test
data:  x 
JB = 11.3431, p-value = 0.003443
alternative hypothesis: greater 
[/C][/ROW] [ROW][C]
> geary
[1] 0.7660844
[/C][/ROW] [/TABLE] Source: https://freestatistics.org/blog/index.php?pk=153594&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=153594&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.1795, z = 0.8347, p-value = 0.4039
alternative hypothesis: data have a skewness 
> anscombe
	Anscombe-Glynn kurtosis test
data:  x 
kurt = 3.9018, z = 2.5122, p-value = 0.012
alternative hypothesis: kurtosis is not equal to 3 
> jarque
	Jarque-Bera Normality Test
data:  x 
JB = 11.3431, p-value = 0.003443
alternative hypothesis: greater 
> geary
[1] 0.7660844



Parameters (Session):
par1 = 1 ; par2 = Do not include Seasonal Dummies ; par3 = No Linear Trend ;
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')