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

Thu, 22 Dec 2011 10:45:29 -0500

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/2011/Dec/22/t1324568745oni05aiqvf2r9ag.htm/, Retrieved Fri, 03 May 2024 08:39:00 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=159630, Retrieved Fri, 03 May 2024 08:39:00 +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

106

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)

-     [Skewness and Kurtosis Test] [] [2011-11-14 13:58:12] [b98453cac15ba1066b407e146608df68]
- R  D    [Skewness and Kurtosis Test] [] [2011-12-22 15:45:29] [daf26cf00f2f7a7ee0a1368c8ac8117e] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

0,2612954
0,1199274
0,0852586
0,0787527
0,0475989
0,0184526
-0,0770353
-0,0269715
0,7787045
-0,1638537
-0,1836121
-0,3507641
0,0075108
0,4577967
0,6827424
0,0616388
0,2385877
-0,4114253
-105949972354199,0000000
-0,2648054
0,1070291
0,1360179
-0,1300411
-0,0525067
0,2999522
-0,0058877
0,5082153
-0,2545075
0,2698511
0,2406800
-0,8312265
0,5704267
-0,0304595
-0,2219388
-0,0537610
-0,1964189
0,4362073
0,1386547
-0,2652463
-0,1002003
0,4426762
-0,0596184
0,1241996
-0,7183755
0,0384192
-0,0411679
0,1062431
-0,3550513
-0,1364715
0,5158243
0,4844733
-0,0873717
-0,4396326
-0,1563765
-0,3812771
-0,1394269
0,0062911
0,1457926
0,3852481
0,0586338
-0,0986281
-0,0997382
-0,2143859
0,1338376
0,0347307
0,2394928
-0,5775264
0,0199321
-0,0806811
-0,1985152
-0,3648308
0,2686832
-0,1742388
0,0603476
-0,5146724
-0,0254469
0,9590277
-0,2079646
0,4114399
-0,2411692
0,3869621
-0,3167880
0,0850939
0,3046019
0,2917561
0,4638277
-0,0853615
0,0856066
-0,1002348
0,1039727
-0,3306544
-0,4827168
0,2309593
0,5200578
0,1699253
-0,2429273
-0,2344870
0,0681538
0,2928410
-0,4215268
-0,4898912
0,2728075
-0,0234383
0,2437270
0,1441034
0,3486934
-0,2023078
-0,1854841
-0,0074343
-0,1426377
0,1094409
0,3583702
0,2211597
-0,0477162
-0,1248808
-0,0322416
-0,3191736
0,3667243
0,4848844
-0,0208251
0,5054507
0,0186890
0,2491611
-0,0125337
0,4052350
-0,0052602
0,2340145
-0,3319049
-0,3975116
-0,1006200
-0,0256229
0,3864107
0,2341884
0,2465479
-0,4497857
-0,1213249
-0,1753105
0,3623830
0,0572417
0,3763589
-0,2915969
-0,2416817
0,0162782
-0,1418666
-0,3654466
-0,7121934
0,4687787
0,3120325
0,1293531
0,1648593
-0,4758823
0,1885553
0,1991413
0,0473497
-0,1827396
0,1509197
-0,5510143
0,6503816
0,0566364
-0,4854993
-0,0237593
0,2340704
0,4182033
0,3923773
0,4896438
0,0558385
0,1073176
0,3541497
0,3202133
0,0060837
0,5006057
0,4108391
0,1220578
0,3928809
0,0194724
-0,2749880
-0,3323001
-0,8219820
-0,6250797
0,2913434
0,3276369
0,0527862
-0,0724262
-0,4526045
-0,1601941
-0,0564278
-0,0577598
-0,0998699
-0,0713135
0,1097104
0,2555912
-0,1260099
-0,2107783
0,1316683
0,1201368
0,2432284
-0,4117344
-0,2413680
0,3052385
0,0657756
-0,1488040
0,1193887
0,1256285
0,2601406
0,2637692
0,1564489
-0,4806378
-0,3081520
0,0356640
-0,5153010
-0,3240954
-0,1485235
0,2335331
0,4658222
0,2535112
-0,2585672
104562110333126,0000000
0,2992508
0,5151253
0,1458136
-0,0456761
-0,3869198
0,0220983
0,1746298
0,0153408
-0,0583372
0,6180818
-0,3458976
0,3066144
0,1971475
-0,1520329
0,6055431
0,0256170
-0,1293628
-0,6566055
-0,1435563
0,1165143
-0,0445963
0,2245579
-0,0519041
0,4250692
-0,0426066
-0,3579304
0,5294173
0,0245672
-0,0230731
-0,0722307
0,1362568
-0,0340457
0,3554641
-0,0014537
-0,0526226
0,5779047
0,1238081
0,3384949
0,2578782
-0,3197173
-0,0369641
0,2043844
-0,0281985
-0,0628542
-0,1879158
-0,1466980
0,5546829
0,0170458
0,1233742
0,1237018
-0,1105713
-0,2544327
-0,3824815
-0,2182999
0,0448819
0,2738115
0,2553722
-0,0033340
0,0779717
0,0317364
0,0759541
0,1211982
-0,4466220
-0,1410048
-0,1257054
-0,4218211
-0,1734130
-0,1822666
0,1446557
-0,2500324
0,4277234

Summary of computational transaction
Raw Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	1 seconds
R Server	'AstonUniversity' @ aston.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 & 'AstonUniversity' @ aston.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=159630&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]'AstonUniversity' @ aston.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=159630&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=159630&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	1 seconds
R Server	'AstonUniversity' @ aston.wessa.net

Skewness and Kurtosis Test
> agostino D'Agostino skewness test data: x skew = -0.2357, z = -1.0888, p-value = 0.2763 alternative hypothesis: data have a skewness
> anscombe Anscombe-Glynn kurtosis test data: x kurt = 144.0246, z = 12.1248, p-value < 2.2e-16 alternative hypothesis: kurtosis is not equal to 3
> jarque Jarque-Bera Normality Test data: x JB = 238657.9, p-value < 2.2e-16 alternative hypothesis: greater
> geary [1] 0.0838771

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

[TABLE]
[ROW][C]Skewness and Kurtosis Test[/C][/ROW]
[ROW][C]> agostino
	D'Agostino skewness test
data:  x 
skew = -0.2357, z = -1.0888, p-value = 0.2763
alternative hypothesis: data have a skewness 
[/C][/ROW]
[ROW][C]> anscombe
	Anscombe-Glynn kurtosis test
data:  x 
kurt = 144.0246, z = 12.1248, p-value < 2.2e-16
alternative hypothesis: kurtosis is not equal to 3 
[/C][/ROW]
[ROW][C]> jarque
	Jarque-Bera Normality Test
data:  x 
JB = 238657.9, p-value < 2.2e-16
alternative hypothesis: greater 
[/C][/ROW]
[ROW][C]> geary
[1] 0.0838771
[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=159630&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=159630&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.2357, z = -1.0888, p-value = 0.2763 alternative hypothesis: data have a skewness
> anscombe Anscombe-Glynn kurtosis test data: x kurt = 144.0246, z = 12.1248, p-value < 2.2e-16 alternative hypothesis: kurtosis is not equal to 3
> jarque Jarque-Bera Normality Test data: x JB = 238657.9, p-value < 2.2e-16 alternative hypothesis: greater
> geary [1] 0.0838771

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