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

Tue, 16 Dec 2014 15:35:19 +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/16/t1418744137c8cm61ks34ys4jq.htm/, Retrieved Thu, 16 May 2024 13:09:22 +0000

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

115

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

F     [Histogram] [Frequency Plot (C...] [2010-09-25 09:09:15] [b98453cac15ba1066b407e146608df68]
- RM D  [Histogram] [WS1 - Task 1 - Fr...] [2014-09-26 11:11:25] [3cc57788b191749bdc089f5fad42e0f8]
- RMPD      [Skewness and Kurtosis Test] [] [2014-12-16 15:35:19] [afff6d6b458ee8576605d3685f592a9b] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

2,44754
0,800045
0,929466
-3,19171
-3,25902
2,00009
3,10472
0,161208
0,890002
-3,2331
-0,50837
-2,73772
1,51548
0,212915
-0,277338
-0,234376
0,86628
-0,451418
-2,11405
0,25659
-3,35852
2,19365
0,719388
3,50444
0,641553
1,02505
1,01627
0,739577
-0,652089
1,07768
-1,47422
1,19843
-0,542515
-2,38614
-0,896968
-0,664059
-0,0166715
1,67738
-2,59098
-0,704516
-5,58275
0,0166071
1,811
0,56151
0,347362
-1,45406
0,713077
-4,33177
3,67402
-0,172197
-0,776435
-4,18935
0,423042
3,30363
2,48971
-0,481589
-4,68605
5,52499
-0,612545
2,06294
-1,03547
1,41475
-3,75258
3,6824
0,144652
-2,0339
-0,600658
1,83174
2,92689
1,41557
-0,519172
0,423062
-1,60905
0,806746
2,37896
1,155
0,717192
1,95276
-2,19179
-3,22379
-1,96058
3,24006
-1,21386
-3,01299
-2,17407
0,239672
-0,158099
-2,19487
-3,2725
4,20656
1,6663
-3,70141
1,29226
-1,56075
-3,5088
-0,319394
-1,4953
0,112228
2,46164
-4,53858
-0,2459
-0,643304
-0,783999
-1,3344
2,73733
-1,80942
2,09785
-4,68945
-4,46369
-1,60128
0,256929
1,08375
-4,58049
0,540901
1,26287
1,3412
-0,211792
2,11853
-1,00991
1,2692
-1,16832
3,31407
-0,00470051
3,26454
-2,1003
0,908774
0,96845
-1,09114
0,961414
0,572868
-0,787862
-0,660571
1,70041
-0,182228
0,583372
-0,629835
2,85287
-4,67218
-0,0274555
0,0440272
0,210227
0,600377
-0,787369
1,35028
0,725797
-0,0724283
-1,65988
-0,0837356
-2,37657
0,0351864
-5,09372
-0,00348552
0,106361
0,782052
2,09901
1,09345
0,680892
2,27367
0,0405955
-0,619107
1,71793
1,02108
-1,35744
2,51298
0,456018
1,85745
0,656948
1,04242
-0,589016
-1,06074
0,185206
1,90695
-0,954029
0,402532
0,464356
2,57179
-1,24839
1,918
-0,609458
-2,0385
-2,17147
-0,338174
1,14531
-0,851234
-4,75625
-0,222667
2,31781
-2,61718
-0,80976
0,337198
0,977818
2,64826
-1,75754
1,77272
1,48551
0,815634
-3,22925
0,88372
2,9834
0,304163
1,1735
1,58397
-0,479416
-0,188863
-1,69807
2,2576
-1,05498
3,18505
2,11036
1,42342
1,77825
0,397507
-1,18841
1,16543
0,14976
-0,142371
1,47737
1,20602
1,31935
-0,535236
1,06196
-0,730592
-0,062858
-0,738187
2,84527
0,748536
0,147263
3,5144
1,58915
0,434014
0,635223
1,63226
1,80878
-2,81816
-0,457781
-5,80882
0,407134
-2,31928
-1,0771
-1,77885
-1,38354
-2,21656
0,981173
1,07662
1,12101
2,18968
0,214662
-2,95866
-0,858238
-1,89634
-3,53305
-2,34091
2,3091
2,01487
-2,09461
1,74912
-2,20142
-5,12696
-0,0666566
-5,27466
1,15358
1,16973
-0,333816
1,25912
1,46358
0,255487
1,71078
-0,240274
1,78516
0,480099
3,80386
-0,381798
2,44828
1,39216
0,782934
0,305909
1,18742
0,507717

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=269741&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=269741&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=269741&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.5439, z = -2.3562, p-value = 0.01846 alternative hypothesis: data have a skewness
> anscombe Anscombe-Glynn kurtosis test data: x kurt = 3.2804, z = 1.0831, p-value = 0.2788 alternative hypothesis: kurtosis is not equal to 3
> jarque Jarque-Bera Normality Test data: x JB = 14.6164, p-value = 0.00067 alternative hypothesis: greater
> geary [1] 0.7773074

\begin{tabular}{lllllllll}
\hline
Skewness and Kurtosis Test \tabularnewline
> agostino
	D'Agostino skewness test
data:  x
skew = -0.5439, z = -2.3562, p-value = 0.01846
alternative hypothesis: data have a skewness
 \tabularnewline
> anscombe
	Anscombe-Glynn kurtosis test
data:  x
kurt = 3.2804, z = 1.0831, p-value = 0.2788
alternative hypothesis: kurtosis is not equal to 3
 \tabularnewline
> jarque
	Jarque-Bera Normality Test
data:  x
JB = 14.6164, p-value = 0.00067
alternative hypothesis: greater
 \tabularnewline
> geary
[1] 0.7773074
 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=269741&T=1

[TABLE]
[ROW][C]Skewness and Kurtosis Test[/C][/ROW]
[ROW][C]> agostino
	D'Agostino skewness test
data:  x
skew = -0.5439, z = -2.3562, p-value = 0.01846
alternative hypothesis: data have a skewness
[/C][/ROW]
[ROW][C]> anscombe
	Anscombe-Glynn kurtosis test
data:  x
kurt = 3.2804, z = 1.0831, p-value = 0.2788
alternative hypothesis: kurtosis is not equal to 3
[/C][/ROW]
[ROW][C]> jarque
	Jarque-Bera Normality Test
data:  x
JB = 14.6164, p-value = 0.00067
alternative hypothesis: greater
[/C][/ROW]
[ROW][C]> geary
[1] 0.7773074
[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=269741&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=269741&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.5439, z = -2.3562, p-value = 0.01846 alternative hypothesis: data have a skewness
> anscombe Anscombe-Glynn kurtosis test data: x kurt = 3.2804, z = 1.0831, p-value = 0.2788 alternative hypothesis: kurtosis is not equal to 3
> jarque Jarque-Bera Normality Test data: x JB = 14.6164, p-value = 0.00067 alternative hypothesis: greater
> geary [1] 0.7773074

Parameters (Session):

par1 = 1 ; par2 = Do not include Seasonal Dummies ; par3 = No Linear Trend ;

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