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

Wed, 12 Nov 2014 16:04:16 +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/Nov/12/t1415808285phnmewq35qx4ez5.htm/, Retrieved Sun, 19 May 2024 16:35:50 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=253939, Retrieved Sun, 19 May 2024 16:35:50 +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)

-     [Central Tendency] [] [2014-11-04 10:08:09] [32b17a345b130fdf5cc88718ed94a974]
- RM D    [Skewness and Kurtosis Test] [] [2014-11-12 16:04:16] [baa7d013c3374cabca6c222951a47a9f] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

-1.76830102097655
1.50248627129154
-0.353700163976197
-2.68590406694006
9.46500731791375
1.65240774905108
9.21098812020108
-1.48941598257743
-2.25548554706803
0.66877644638716
-0.464147286174695
-2.02307150567766
-0.445135686905615
1.96852749071529
0.727049521802911
0.614038060020609
1.21464038188083
1.51196714200601
-2.67141820155116
1.06051449816216
-3.35865213456547
-0.837600094568149
-0.778330018470876
-0.636548556334055
0.904779640065188
-6.34089742972907
-0.308962823450038
2.08446891274155
2.16906209567464
-2.25100847417708
-2.2420091330558
0.0656148625276699
-1.08534324821342
-0.638240836697541
0.103196596182248
-5.10042473941423
2.39664157661218
-0.342663987388537
-0.737536362140931
-3.53144756893342
-2.98862733406066
2.42260202743885
-3.16402412442502
-1.11679538792811
-3.39504721757422
-2.55481369523916
-3.53749119290312
-1.15542520218091
4.29319941500961
-2.46599234229432
-1.36410726475483
0.716564175058814
2.35108003086217
-0.367151724790675
-4.79196817313527
-0.424768058731675
1.78160208178725
-3.31207356996676
-4.14796126311765
0.836577221025113
1.79068080957543
-1.10094030617711
-2.40270712993033
0.152308705710901
0.341932090745411
-3.84630106887371
2.55075552955638
-1.71019819434708
0.0354794638439449
1.83846238486388
-0.961995144915568
2.50782326799586
1.64345367422922
-1.73764410292846
-1.84751580224981
5.42172448322187
2.27486568421659
3.51995526182002
0.591426892239281
-4.87576917214016
-0.826552202443845
-2.25821250931311
-3.0893193530794
0.562395689755053
-0.282092782252781
0.39940392277197
0.629223857477788
-0.824004424650408
0.924636950054056
4.46311876653487
1.46138471821038
1.35579181730116
1.08503752756162
2.53352958661262
-3.58635078068166
-0.120080214758501
1.97235618251507
-1.57640063720175
0.655195489699713
-2.36439063929211
-0.430970801268512
2.01960457667716
1.86580618156908
-4.06534016887942
4.09313030343364
2.53089329231804
-0.0181029561125804
3.99957281607681
-0.999828829223529
6.9433163832284
2.24790358244541
0.45509386878877
-1.77940502302506
0.529278647652716
1.40700611564401
-0.438042975280748
0.30552308978113
-0.341360951656683
-4.35414705624595
3.00483930911453
-0.231952703810982
1.51469451822615
-0.876457476610727
-3.78547967039497
-1.09873190513944
-2.00074668171868
-2.21617249767077
-0.413662202065774
1.57293196002352
0.312528164852296
-2.51424986783709
2.71902463120652
-1.97533989187795
1.94476618090627
-0.26886878922808
2.83797483960543
7.0802655123504
0.761521071395758
-0.28591096849508
-2.13270155468386
-2.93048224192108
-2.9208479722777
2.67485815085014
0.0270293238285449
0.153423289519854
-0.763021777031591
1.16203716141311
-2.55861868001004
-2.9089861256953
2.47395581759885
-0.077328551152544
3.90451797624308
-2.60650634668794
-2.33845315873226
2.41676763915772
3.73886687868626
1.35579181730116
0.363393479124349
1.57293196002352
-3.94898224913689
3.551356434478
1.85032659474401

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	'Gwilym Jenkins' @ jenkins.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 & 'Gwilym Jenkins' @ jenkins.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=253939&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]'Gwilym Jenkins' @ jenkins.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=253939&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=253939&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	'Gwilym Jenkins' @ jenkins.wessa.net

Skewness and Kurtosis Test
> agostino D'Agostino skewness test data: x skew = 0.5853, z = 1.9568, p-value = 0.05037 alternative hypothesis: data have a skewness
> anscombe Anscombe-Glynn kurtosis test data: x kurt = 4.2635, z = 2.5426, p-value = 0.011 alternative hypothesis: kurtosis is not equal to 3
> jarque Jarque-Bera Normality Test data: x JB = 20.025, p-value = 4.484e-05 alternative hypothesis: greater
> geary [1] 0.7730392

\begin{tabular}{lllllllll}
\hline
Skewness and Kurtosis Test \tabularnewline
> agostino
	D'Agostino skewness test
data:  x
skew = 0.5853, z = 1.9568, p-value = 0.05037
alternative hypothesis: data have a skewness
 \tabularnewline
> anscombe
	Anscombe-Glynn kurtosis test
data:  x
kurt = 4.2635, z = 2.5426, p-value = 0.011
alternative hypothesis: kurtosis is not equal to 3
 \tabularnewline
> jarque
	Jarque-Bera Normality Test
data:  x
JB = 20.025, p-value = 4.484e-05
alternative hypothesis: greater
 \tabularnewline
> geary
[1] 0.7730392
 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=253939&T=1

[TABLE]
[ROW][C]Skewness and Kurtosis Test[/C][/ROW]
[ROW][C]> agostino
	D'Agostino skewness test
data:  x
skew = 0.5853, z = 1.9568, p-value = 0.05037
alternative hypothesis: data have a skewness
[/C][/ROW]
[ROW][C]> anscombe
	Anscombe-Glynn kurtosis test
data:  x
kurt = 4.2635, z = 2.5426, p-value = 0.011
alternative hypothesis: kurtosis is not equal to 3
[/C][/ROW]
[ROW][C]> jarque
	Jarque-Bera Normality Test
data:  x
JB = 20.025, p-value = 4.484e-05
alternative hypothesis: greater
[/C][/ROW]
[ROW][C]> geary
[1] 0.7730392
[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=253939&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=253939&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.5853, z = 1.9568, p-value = 0.05037 alternative hypothesis: data have a skewness
> anscombe Anscombe-Glynn kurtosis test data: x kurt = 4.2635, z = 2.5426, p-value = 0.011 alternative hypothesis: kurtosis is not equal to 3
> jarque Jarque-Bera Normality Test data: x JB = 20.025, p-value = 4.484e-05 alternative hypothesis: greater
> geary [1] 0.7730392

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