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, 11 Dec 2014 13:31:18 +0000

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/2014/Dec/11/t1418304691jqnkcy2dfgxuov6.htm/, Retrieved Thu, 16 May 2024 14:44:12 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=265978, Retrieved Thu, 16 May 2024 14:44:12 +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

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

-       [Skewness and Kurtosis Test] [] [2014-12-11 13:31:18] [26b3f07cb5f54f7efd4618e9d9764016] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

-0.203371
1.83954
-3.99842
-3.54979
1.99535
2.47494
0.491011
-1.06717
-2.40548
0.497605
-4.96832
-1.19681
-3.32339
1.45495
0.0324611
-1.52205
-0.895006
4.27043
-0.532763
0.344667
-0.766884
3.30913
-1.76993
0.667426
-2.96608
0.611989
-1.13864
0.268181
-0.0694413
4.24212
-0.2916
1.66636
-0.169951
2.75267
-0.286787
1.80494
1.12226
2.94223
2.78156
-0.234387
4.30637
-3.39222
2.62824
-3.48627
-1.77293
5.03519
-0.131355
1.33328
0.961863
3.08047
0.87483
-3.40977
-0.0697041
-0.353665
-4.67409
-0.267995
1.90704
-3.57494
-1.11979
-0.527631
-0.134618
-3.1628
1.73693
-8.62592
-2.1841
3.96131
3.54727
-2.74729
0.516192
0.665353
1.96648
-4.34254
0.198455
2.28418
1.80142
-3.45617
-0.59196
2.05281
-1.51061
3.38987
0.645193
1.11523
-1.05139
0.913353
0.3663
-1.1055
-1.76182
3.44819
-4.76006
1.60361
-0.164952
-1.46406
5.11849
0.807546
3.18599
0.507788
0.726992
-0.290257
-0.817927
-0.0100989
4.00474
-4.57783
-0.426452
3.76331
1.50891
1.31086
-1.03203
1.89323
0.444468
-2.24862
-2.51039
1.39191
1.90086
0.722152
2.60669
2.59014
-1.63463
1.89309
2.78846
0.164052
-4.39915
1.35566
2.70636
-0.481726
1.4205
1.44723
2.94503
-1.89198
3.95074
0.768292
-6.26729
-3.85708
-0.76368
3.36079
-0.120031
-0.436506
0.219161
3.45397
-1.56933
-0.495751
-1.02855
-3.1601
1.27308
-3.32889
3.97453
-0.699685
-0.00667291
-1.51653
0.0312629
1.38456
1.2778
3.36525
0.128356
-1.02979
1.05131
0.0723306
0.818199
-4.1199
-0.729021
3.42905
1.92781
-2.77076
1.67204
-3.84477
-0.451414
-0.508117
-1.20322
1.72267
4.15216
-2.86415
-0.188474
3.31753
-6.05261
-0.898591
3.272
3.69014
1.28913
3.45901
2.23509
1.70036
3.92907
5.43171
1.33328
-0.0097872
-0.439357
-2.82121
-8.79276
-1.31713
-0.6039
-2.44398
-0.435604
-2.49312
-2.95265
1.53202
2.71388
-1.87747
0.0818738
0.611181
0.623405
-0.256333
0.197445
-0.993439
-3.84957
0.0675354
-0.719349
-1.2423
0.736092
-5.0831
-6.41785
-2.72363
-5.87623
-1.85687
-2.3713
-3.05836
1.5444
1.99207
-0.710742
-0.0456103
2.16158
2.75577
-2.48705
2.3506
-0.786099
0.557902
1.49737
0.677204
-0.208789
1.40129

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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=265978&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	0 seconds
R Server	'Sir Maurice George Kendall' @ kendall.wessa.net

Skewness and Kurtosis Test
> agostino D'Agostino skewness test data: x skew = -0.5388, z = -2.1285, p-value = 0.03329 alternative hypothesis: data have a skewness
> anscombe Anscombe-Glynn kurtosis test data: x kurt = 3.4911, z = 1.5218, p-value = 0.1281 alternative hypothesis: kurtosis is not equal to 3
> jarque Jarque-Bera Normality Test data: x JB = 13.3238, p-value = 0.001279 alternative hypothesis: greater
> geary [1] 0.7742745

\begin{tabular}{lllllllll}
\hline
Skewness and Kurtosis Test \tabularnewline
> agostino
	D'Agostino skewness test
data:  x
skew = -0.5388, z = -2.1285, p-value = 0.03329
alternative hypothesis: data have a skewness
 \tabularnewline
> anscombe
	Anscombe-Glynn kurtosis test
data:  x
kurt = 3.4911, z = 1.5218, p-value = 0.1281
alternative hypothesis: kurtosis is not equal to 3
 \tabularnewline
> jarque
	Jarque-Bera Normality Test
data:  x
JB = 13.3238, p-value = 0.001279
alternative hypothesis: greater
 \tabularnewline
> geary
[1] 0.7742745
 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=265978&T=1

[TABLE]
[ROW][C]Skewness and Kurtosis Test[/C][/ROW]
[ROW][C]> agostino
	D'Agostino skewness test
data:  x
skew = -0.5388, z = -2.1285, p-value = 0.03329
alternative hypothesis: data have a skewness
[/C][/ROW]
[ROW][C]> anscombe
	Anscombe-Glynn kurtosis test
data:  x
kurt = 3.4911, z = 1.5218, p-value = 0.1281
alternative hypothesis: kurtosis is not equal to 3
[/C][/ROW]
[ROW][C]> jarque
	Jarque-Bera Normality Test
data:  x
JB = 13.3238, p-value = 0.001279
alternative hypothesis: greater
[/C][/ROW]
[ROW][C]> geary
[1] 0.7742745
[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=265978&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=265978&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.5388, z = -2.1285, p-value = 0.03329 alternative hypothesis: data have a skewness
> anscombe Anscombe-Glynn kurtosis test data: x kurt = 3.4911, z = 1.5218, p-value = 0.1281 alternative hypothesis: kurtosis is not equal to 3
> jarque Jarque-Bera Normality Test data: x JB = 13.3238, p-value = 0.001279 alternative hypothesis: greater
> geary [1] 0.7742745

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