FreeStatistics.org

Free Statistics

of Irreproducible Research!

Description of Statistical Computation

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 computationMon, 15 Dec 2014 20:15:51 +0000
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2014/Dec/15/t14186745636zp71tudtkxa3h7.htm/, Retrieved Thu, 16 May 2024 14:14:46 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=268989, Retrieved Thu, 16 May 2024 14:14:46 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact81

Tree of Dependent Computations

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Chi-Squared Test, McNemar Test, and Fisher Exact Test] [Chi-squared test] [2014-11-02 11:21:00] [5c51c91cab622bcf955f01721b682696]
- R  D  [Chi-Squared Test, McNemar Test, and Fisher Exact Test] [] [2014-12-15 17:26:49] [e493208d2907342b139e6792bbaea494]
-    D    [Chi-Squared Test, McNemar Test, and Fisher Exact Test] [] [2014-12-15 17:30:24] [e493208d2907342b139e6792bbaea494]
-    D      [Chi-Squared Test, McNemar Test, and Fisher Exact Test] [] [2014-12-15 17:36:06] [e493208d2907342b139e6792bbaea494]
-    D        [Chi-Squared Test, McNemar Test, and Fisher Exact Test] [] [2014-12-15 17:38:19] [e493208d2907342b139e6792bbaea494]
-    D          [Chi-Squared Test, McNemar Test, and Fisher Exact Test] [] [2014-12-15 17:39:21] [e493208d2907342b139e6792bbaea494]
-    D            [Chi-Squared Test, McNemar Test, and Fisher Exact Test] [] [2014-12-15 17:40:38] [e493208d2907342b139e6792bbaea494]
-    D              [Chi-Squared Test, McNemar Test, and Fisher Exact Test] [] [2014-12-15 18:43:34] [e493208d2907342b139e6792bbaea494]
-    D                [Chi-Squared Test, McNemar Test, and Fisher Exact Test] [] [2014-12-15 18:53:25] [e493208d2907342b139e6792bbaea494]
-    D                  [Chi-Squared Test, McNemar Test, and Fisher Exact Test] [] [2014-12-15 18:54:41] [e493208d2907342b139e6792bbaea494]
-    D                    [Chi-Squared Test, McNemar Test, and Fisher Exact Test] [] [2014-12-15 18:55:52] [e493208d2907342b139e6792bbaea494]
-    D                      [Chi-Squared Test, McNemar Test, and Fisher Exact Test] [] [2014-12-15 18:56:38] [e493208d2907342b139e6792bbaea494]
-    D                        [Chi-Squared Test, McNemar Test, and Fisher Exact Test] [] [2014-12-15 18:59:28] [e493208d2907342b139e6792bbaea494]
-    D                          [Chi-Squared Test, McNemar Test, and Fisher Exact Test] [] [2014-12-15 19:00:52] [e493208d2907342b139e6792bbaea494]
-    D                            [Chi-Squared Test, McNemar Test, and Fisher Exact Test] [] [2014-12-15 19:02:37] [e493208d2907342b139e6792bbaea494]
-    D                              [Chi-Squared Test, McNemar Test, and Fisher Exact Test] [] [2014-12-15 19:03:31] [e493208d2907342b139e6792bbaea494]
-    D                                [Chi-Squared Test, McNemar Test, and Fisher Exact Test] [] [2014-12-15 19:04:30] [e493208d2907342b139e6792bbaea494]
-    D                                  [Chi-Squared Test, McNemar Test, and Fisher Exact Test] [] [2014-12-15 19:05:26] [e493208d2907342b139e6792bbaea494]
-    D                                    [Chi-Squared Test, McNemar Test, and Fisher Exact Test] [] [2014-12-15 19:06:29] [e493208d2907342b139e6792bbaea494]
-    D                                      [Chi-Squared Test, McNemar Test, and Fisher Exact Test] [] [2014-12-15 19:07:30] [e493208d2907342b139e6792bbaea494]
-    D                                        [Chi-Squared Test, McNemar Test, and Fisher Exact Test] [] [2014-12-15 19:08:04] [e493208d2907342b139e6792bbaea494]
- RM D                                            [Skewness and Kurtosis Test] [] [2014-12-15 20:15:51] [04df4205f362f56e0d1a9032a00a5d3d] [Current]
Feedback Forum

Post a new message

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
1.28304
-4.07599
-3.83222
-0.350144
1.20135
-0.0667887
-4.21137
-0.356061
-5.96156
-0.018959
-0.180716
-2.17211
-4.2813
1.74166
3.20255
0.325122
-1.62823
2.65272
-0.407988
-4.47005
-1.95515
-3.22642
-1.26505
-1.47806
0.416235
-1.90053
-4.55881
-1.08626
2.12154
-0.288062
0.845055
-0.277039
-3.75684
0.944402
-0.39865
-4.93102
-0.973059
1.00294
0.878257
-1.96247
3.28582
1.97119
-1.5913
3.68836
-1.63803
1.47918
2.77153
2.91951
-3.74395
1.53879
-3.53341
-4.57851
0.440684
0.244912
1.97145
-5.04085
-0.383556
-4.08197
-3.06089
0.390992
2.46221
-3.32081
-0.460858
-1.77741
-1.4174
2.47161
0.819445
-4.56408
0.708549
2.13578
2.45397
2.07242
-3.14284
-1.37117
3.49141
-3.45337
-0.855516
0.655022
-2.93071
2.4823
1.64265
1.51948
1.6376
0.223778
0.672923
-1.66849
3.24127
-4.37808
-1.33124
0.342586
3.68954
0.351137
0.721155
-0.410376
1.36605
1.9079
1.63738
2.38628
0.299193
2.62286
-1.34078
3.4852
1.5913
3.76942
0.324402
1.58661
-0.258342
-0.258342
2.99772
-0.526386
1.35678
1.63522
-1.70238
-0.196345
0.619085
2.44857
-1.55574
0.77316
2.59439
1.77795
-0.502878
-2.81035
2.69761
0.681744
1.54592
2.42431
1.76803
-1.0059
2.29527
2.66626
1.15795
0.995714
1.33018
4.08608
2.60479
1.81996
-0.990341
-1.14096
-5.38397
-2.86053
-1.58579
-0.374066
2.83363
3.18841
1.00601
0.2084
0.027632
-1.14647
-1.83044
1.42046
-1.02488
-1.85487
-4.52657
1.5913
-1.17243
2.83363
0.509481
3.85775
1.32649
0.642627
1.97274
-0.929458

Tables (Output of Computation)





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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=268989&T=0

As an alternative you can also use a QR Code:  
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 time0 seconds
R Server'Sir Ronald Aylmer Fisher' @ fisher.wessa.net






Skewness and Kurtosis Test
> agostino
	D'Agostino skewness test
data:  x
skew = -0.5049, z = -1.7135, p-value = 0.08663
alternative hypothesis: data have a skewness

> anscombe
	Anscombe-Glynn kurtosis test
data:  x
kurt = 2.5075, z = -1.4790, p-value = 0.1391
alternative hypothesis: kurtosis is not equal to 3

> jarque
	Jarque-Bera Normality Test
data:  x
JB = 8.5199, p-value = 0.01412
alternative hypothesis: greater

> geary
[1] 0.8191984


\begin{tabular}{lllllllll}
\hline
Skewness and Kurtosis Test \tabularnewline

> agostino
	D'Agostino skewness test
data:  x
skew = -0.5049, z = -1.7135, p-value = 0.08663
alternative hypothesis: data have a skewness

 \tabularnewline

> anscombe
	Anscombe-Glynn kurtosis test
data:  x
kurt = 2.5075, z = -1.4790, p-value = 0.1391
alternative hypothesis: kurtosis is not equal to 3

 \tabularnewline

> jarque
	Jarque-Bera Normality Test
data:  x
JB = 8.5199, p-value = 0.01412
alternative hypothesis: greater

 \tabularnewline

> geary
[1] 0.8191984

 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=268989&T=1

[TABLE]
[ROW][C]Skewness and Kurtosis Test[/C][/ROW]
[ROW][C]
> agostino
	D'Agostino skewness test
data:  x
skew = -0.5049, z = -1.7135, p-value = 0.08663
alternative hypothesis: data have a skewness

[/C][/ROW]
[ROW][C]
> anscombe
	Anscombe-Glynn kurtosis test
data:  x
kurt = 2.5075, z = -1.4790, p-value = 0.1391
alternative hypothesis: kurtosis is not equal to 3

[/C][/ROW]
[ROW][C]
> jarque
	Jarque-Bera Normality Test
data:  x
JB = 8.5199, p-value = 0.01412
alternative hypothesis: greater

[/C][/ROW]
[ROW][C]
> geary
[1] 0.8191984

[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=268989&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=268989&T=1

As an alternative you can also use a QR Code:  
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.5049, z = -1.7135, p-value = 0.08663
alternative hypothesis: data have a skewness

> anscombe
	Anscombe-Glynn kurtosis test
data:  x
kurt = 2.5075, z = -1.4790, p-value = 0.1391
alternative hypothesis: kurtosis is not equal to 3

> jarque
	Jarque-Bera Normality Test
data:  x
JB = 8.5199, p-value = 0.01412
alternative hypothesis: greater

> geary
[1] 0.8191984


Figures (Output of Computation)

Input Parameters & R Code

Parameters (Session):
par1 = 1 ; par2 = 2 ; par3 = Pearson Chi-Squared ;
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')