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 computationSun, 18 Dec 2011 11:36:39 -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/18/t1324226213qn0gtshjh9l7hie.htm/, Retrieved Sun, 05 May 2024 16:49:09 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=157058, Retrieved Sun, 05 May 2024 16:49: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)
-     [Variance Reduction Matrix] [] [2011-12-13 15:30:28] [b98453cac15ba1066b407e146608df68]
- RMPD    [Skewness and Kurtosis Test] [] [2011-12-18 16:36:39] [d76b387543b13b5e3afd8ff9e5fdc89f] [Current]
Feedback Forum

Post a new message
Dataseries X:
10.4212727734
9.176607688
10.780836773
12.4085493107
8.3892492778
4.9861602517
8.3215194779
5.0997163989
13.6803933954
3.1565957245
-31.304620316
7.4993274565
-2.2567604619
-16.8828750033
-0.3370351893
-22.8257254962
-26.9545759287
46.1600818508
-2.6264300402
-23.401446363
-7.5140458032
19.0135063408
-28.1298461558
5.0192111571
12.6352831965
-11.3334706863
-12.0923651593
-13.5107227089
-2.5820076035
-17.7661030929
86.0245006657
-71.4512821988
-22.5975852043
12.4428441249
-37.1527246596
12.5924938881
13.1307017316
-12.9212038601
38.9312439826
-20.9660841074
26.3411816863
19.8889141393
-42.0950536025
-86.4053453133
-21.6455699934
-17.9367545149
10.767233922
37.7210461169
13.1498409066
8.2192635971
-2.7399851758
-52.2252004818
-47.8158998613
-56.930326937
-55.3723742821
-55.2956656824
-15.6994182909
-0.3304590335
14.3614097845
22.7973956762
-18.1772127013
-4.0393307998
77.0316935302
-6.3519356947
86.4187231892
-13.7117990854
17.9898234673
89.9968016401
-0.7671620265
-36.7613667097
26.0667819751
-56.7627188662
38.9205422934
21.8454655384
-33.2166264036
47.4601963222
72.3510045548
3.9145405743
31.7040140706
49.3761439945
-14.8500987069
52.2757504645
-58.3696515479
-22.5926046619
25.0990540381
64.9086980757
3.3576036178
2.7945691153
-75.011684249
54.0557299103
-0.628001235
-45.3576960396
-0.9052739748
109.1194986261
2.9653946804
0.2724802804
15.2210921537
88.7819813526
-19.8456741035
-5.7869462558
-54.7264610464
-3.8411070797
-18.8808998038
1.4087249523
42.568842891
-11.3419805754
8.5088544459
54.7305721028
36.3435911697
-57.0690282743
-1.8076824813
22.2024436526
-28.6046365282
80.6493870697
-73.8726818323
-111.2659657719
-124.5202836517
-3.3790377274
-0.8727661573
4.9323721697
-48.2469368469
-49.8400304783
18.1932854042
84.7674712878
-45.6588225281
-98.9015021138
11.9073281873
17.8804486581
-18.2016447363
57.9696008187
41.7145811164
-5.3311449243
97.9230495694
57.285873217
-12.361704288
20.065404869
81.9853820401
-158.6742783136
-60.779079667
-61.1102034475
-84.7208808612
-31.4168283287
40.6365938517
32.6181312877
65.4821256149
61.2020491077
-4.2387363279
57.3259698961
46.6210125149
32.6569790127
-25.3460066495
19.459157132
-86.8926371346
67.5821509504
-3.9240769501
16.137384165
13.5020305711
83.8612878568
56.6796306638
-47.081163123
16.9867160177
45.488231254
-0.4013297585
-21.912694541
-71.8972699538
-75.177304087
10.197330595
115.175632797
4.0693045306
-83.1493207905
28.8512715912
47.5700836965
90.613195339
41.5112562919
-63.2456965752
-190.7306961463
-11.6625767516
8.0844097279
40.4438353735
49.7722908244
-11.9520526532
67.4789293583
124.6532960582
-7.1005347802
-138.6711798648
-102.1666414322
-140.3970637347
-68.1711341742
-23.4970518472
33.548258862
68.8502297073
104.6906593267
-34.3496216913
-47.0030432481
108.5312238255
-33.236828333
10.5388044605
56.3180876243
-113.4707792702
-115.8025521184
-121.1666466116
-99.9925324692
139.4653806349
34.2586023832
76.8744802413
202.6224232587
20.0273962747
17.5716760416
262.6918812005
-203.7937548491
-175.8474007921
-123.1981513495
79.2232063795
-0.4021812533
156.5569499552
56.2703978615
194.0870914839
-28.9612591842
-29.8465756697
99.0766076019
70.8896028286
90.5114442807
76.614794133
-82.8422411612
-192.8229798092
103.1348595996
-70.9918585213
-18.1312785512
50.903659917
32.2174306568
-5.1246646713
166.62657827
36.7225878323
172.431559133
185.9244733359
-48.1085171229
36.5396684045
-97.8329081023
93.7250638512
11.2471429204
-63.2893180183
24.8384838189
166.6757780901
108.8570525339
-133.1471984953
32.3888841092
-1.3418772043
201.1377672277
-226.8671055658
-347.0879890445
-9.1995665054
-119.3525149989
-21.0926823914
144.2925006071
151.556257381
149.6892306019
-73.8170307972
230.521422381
-38.4473356314
79.1745223462
3.7355134064
116.5147381547
-97.8183419238
116.8186842688
55.3583146057
10.4212382765
-117.9565206454
-143.6374151468
134.1991262052
-62.8527845194
230.618800832
244.008935171
-205.4550515094
-44.375957172
-49.0035937988
195.7059881154
51.924879211
100.8838872766
-240.2311040642
65.0345262834
-98.6117242523
64.7877898108
-79.0512510079
144.5331705746
121.9996952554
110.2997702452
1.2235037688
95.1950162408
153.5414801811
76.484429854
44.480251191
6.9203554519
33.5909221602
-269.5519520739
-66.1802885331
-169.9112211878
90.1125203225
-39.5250348595
76.4776387979
-18.9090286973
195.6621309378
-51.9373326124
101.2364812167
208.0811166796
-63.6794893552
82.7127780604
30.5788037661
-55.9139481581
-228.4043898681
62.8138034136
60.4947966428
196.5087192772
-280.5208676403
150.0241228009
96.286957129
-51.0133737481
-68.9251094289
-49.9695526908
74.2476422404
-21.8104410236
19.0716166363
-229.8067161621
-145.4698914994
109.344962697
422.4052208824
151.6115962265
29.681629774
-248.5215774187
113.5046840777
54.8694040038
40.799231281
41.0681617787
-137.3349723492
-544.1632422829
-61.8430861469
-76.3824102684
-180.0636046703
-37.8043607105
-172.5806231891
-102.0858623376
-66.2375629273
-360.0936800741
-14.8416200873
-180.98724989
-22.7821835442
-244.299034058
-122.2428925799
-141.1376169726
-53.8135618422
-65.7050342061
103.7932717661
134.3736754636
101.5236862735
195.9666879943
165.198974988
276.171913339
-119.3579138448
61.4153150584
-208.9957061215
-230.1028650324
-127.1581317578
-131.7084487298
-71.898649897
12.605533319
291.2557675732
49.114209389
-53.3629187561
-122.5324872319
89.7373126602




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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=157058&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'Gertrude Mary Cox' @ cox.wessa.net







Skewness and Kurtosis Test
> agostino
	D'Agostino skewness test
data:  x 
skew = -0.4638, z = -2.3338, p-value = 0.0196
alternative hypothesis: data have a skewness 
> anscombe
	Anscombe-Glynn kurtosis test
data:  x 
kurt = 6.1985, z = 5.6686, p-value = 1.44e-08
alternative hypothesis: kurtosis is not equal to 3 
> jarque
	Jarque-Bera Normality Test
data:  x 
JB = 170.5151, p-value < 2.2e-16
alternative hypothesis: greater 
> geary
[1] 0.70395

\begin{tabular}{lllllllll}
\hline
Skewness and Kurtosis Test \tabularnewline
> agostino
	D'Agostino skewness test
data:  x 
skew = -0.4638, z = -2.3338, p-value = 0.0196
alternative hypothesis: data have a skewness 
\tabularnewline
> anscombe
	Anscombe-Glynn kurtosis test
data:  x 
kurt = 6.1985, z = 5.6686, p-value = 1.44e-08
alternative hypothesis: kurtosis is not equal to 3 
\tabularnewline
> jarque
	Jarque-Bera Normality Test
data:  x 
JB = 170.5151, p-value < 2.2e-16
alternative hypothesis: greater 
\tabularnewline
> geary
[1] 0.70395
\tabularnewline \hline \end{tabular} %Source: https://freestatistics.org/blog/index.php?pk=157058&T=1

[TABLE]
[ROW][C]Skewness and Kurtosis Test[/C][/ROW]
[ROW][C]
> agostino
	D'Agostino skewness test
data:  x 
skew = -0.4638, z = -2.3338, p-value = 0.0196
alternative hypothesis: data have a skewness 
[/C][/ROW] [ROW][C]
> anscombe
	Anscombe-Glynn kurtosis test
data:  x 
kurt = 6.1985, z = 5.6686, p-value = 1.44e-08
alternative hypothesis: kurtosis is not equal to 3 
[/C][/ROW] [ROW][C]
> jarque
	Jarque-Bera Normality Test
data:  x 
JB = 170.5151, p-value < 2.2e-16
alternative hypothesis: greater 
[/C][/ROW] [ROW][C]
> geary
[1] 0.70395
[/C][/ROW] [/TABLE] Source: https://freestatistics.org/blog/index.php?pk=157058&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=157058&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.4638, z = -2.3338, p-value = 0.0196
alternative hypothesis: data have a skewness 
> anscombe
	Anscombe-Glynn kurtosis test
data:  x 
kurt = 6.1985, z = 5.6686, p-value = 1.44e-08
alternative hypothesis: kurtosis is not equal to 3 
> jarque
	Jarque-Bera Normality Test
data:  x 
JB = 170.5151, p-value < 2.2e-16
alternative hypothesis: greater 
> geary
[1] 0.70395



Parameters (Session):
par1 = 0.025 ; par2 = 0.975 ; par3 = 0.05 ;
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')