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

Fri, 23 Dec 2011 07:09:24 -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/23/t1324642205ab6wo5uauvdx9tw.htm/, Retrieved Mon, 29 Apr 2024 21:51:46 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=160334, Retrieved Mon, 29 Apr 2024 21:51:46 +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] [Skewness] [2011-12-23 12:09:24] [63b8a9573feb7e5c5af439dd6e45c15a] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

-52.69209978
-192.1907146
-58.3283242
-115.67056
27.47680174
-189.9686317
453.0888618
-60.75274933
88.84023663
-75.44726985
57.12860217
31.72035498
-93.43585518
-27.90024556
74.49563317
39.9577598
154.5375931
-43.0319112
167.8496579
-169.9375133
-122.0287355
-30.62365625
396.1138421
19.84681322
-282.7504603
-111.8828666
-36.98476442
74.13520732
50.50775482
-3.923552196
42.83734276
-53.17923394
-163.3731286
25.37866843
-124.9520325
104.8219733
63.60420761
168.7315238
346.6081245
-17.62398499
28.84625286
64.83675592
19.04617951
135.8145954
224.6857366
-62.56405916
122.3804847
-5.967659412
-66.99921063
65.28902836
520.1030241
-35.8444641
-152.7478765
27.02298809
-152.6618034
-53.57339914
-8.316913237
206.0190139
-53.00077075
52.47857525
72.73577997
-76.88157573
408.6254042
67.60636381
-183.8800158
-12.2094166
130.913055
142.4080885
-15.89178614
74.62795969
19.80100128
-1.787208886
42.78914279
-168.7476594
-45.09180946
-88.3813205
-90.39059203
-68.02354162
-60.78219196
-36.64022707
-52.1375798
-198.7420474
181.1352727
78.46356694
-13.95005888
-132.5073703
-44.30176349
4.637804352
336.3450978
57.78306514
-24.17324809
-30.02366101
71.57185109
-153.3714072
-1.002730501
342.9082885
211.6534597
-295.7413301
150.0368056
-212.0143311
10.45717532
78.82073081
91.39262606
-97.91458169
-144.6959932
-113.6333579
-56.2197732
-12.17277241
7.063280048
25.72018214
-98.50839678
58.84814473
-189.7785548
101.7084793
-205.2862224
48.70049238
69.23690174
278.4704277
-160.1692242
24.74344711
29.70170359
2.033008127
15.73493851
-185.9081194
68.49187292
45.21989473
65.9618591
-138.8546651
21.59681763
2.167097596
1.088062784
-86.73457693
-5.310086257
-41.52074588
-130.3627023
159.5546788
11.85191141
150.0368217
-119.6413673
-79.39552336
-31.21763489
-19.81479799
54.11482345
128.8342578
-69.54208052
-8.340445223
-86.38591818
-143.8327819
-20.7184884
-49.6074722
52.21148779
-211.3214713
61.97388298
181.8421202
16.13428011
6.204168725
-51.88053084
23.20914405
-106.6916748
101.3372711
205.8108199
-113.6449209
23.80384322
214.4000236
-51.16974338
-29.76526172
-81.38241078
22.0096516
1.998336015
365.0740217
291.3489555
-206.9459758
227.7192708
33.6101705
-329.2121975
142.1121155
-63.94355803
31.6051859
-134.9037418
167.8309109
21.78266024
12.36119403
-10.3978051
29.62956546
111.9986465
-31.04033908
32.00949836
-4.961810975
65.57092486
-6.606851131
83.30748747
70.03020569
2.77833019
-91.33407803
-25.58412384
-11.66340092
-42.45466428
-119.0479047
-38.89410539
-163.6677577
-45.22254746
-84.78393572
110.7104
44.92610986
-16.01405069
-68.58947763
-14.70361555
214.856787
94.14264686
27.34553766
87.3906556
73.19681841
-79.53113578
-5.621435146
-85.1598118
-104.5575462
-36.28720415
-42.09486979
-30.3951492
37.14993001
-64.09779875
-49.68056866
-45.55661208
-70.06189534
-78.57301057
100.2471094
44.71736206
-186.8356253
-49.46132399
-107.663015
-67.39223262
-3.93028456
-37.06347307
-48.76468159
-104.7873985
-80.56839892
189.2487672
-70.95683553
-23.23469986
-123.6733812
28.89725939
-19.80354981
-82.48050157
-80.62166121
-53.11740558
-28.96324088
2.467102183
35.16960304
27.70605674
-60.55609362
109.7530718
-58.00658367
-18.13393183
31.62910036
20.89568852
10.59771046
-79.72742836
48.84522348
3.653163764
-20.04326208
-43.56455769
-62.07517142
17.96214696
-67.04595134
-101.0242234
6.120604883
-110.3410038
-58.11500094
76.0275779
-77.73926935
10.06920171
-33.77462144
74.19564592
25.80803806
0.332998757
-15.75121499
0.910276228
-19.64748415
-7.879380653
-22.47716605
-50.29079112
43.75166108
58.34436188
37.13857959
-13.21068178
-81.66297247
-1.145491344
-154.4804112
0.342390335

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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=160334&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.9965, z = 3.9733, p-value = 7.089e-05 alternative hypothesis: data have a skewness
> anscombe Anscombe-Glynn kurtosis test data: x kurt = 5.8263, z = 4.8671, p-value = 1.133e-06 alternative hypothesis: kurtosis is not equal to 3
> jarque Jarque-Bera Normality Test data: x JB = 144.0199, p-value < 2.2e-16 alternative hypothesis: greater
> geary [1] 0.711955

\begin{tabular}{lllllllll}
\hline
Skewness and Kurtosis Test \tabularnewline
> agostino
	D'Agostino skewness test
data:  x 
skew = 0.9965, z = 3.9733, p-value = 7.089e-05
alternative hypothesis: data have a skewness 
 \tabularnewline
> anscombe
	Anscombe-Glynn kurtosis test
data:  x 
kurt = 5.8263, z = 4.8671, p-value = 1.133e-06
alternative hypothesis: kurtosis is not equal to 3 
 \tabularnewline
> jarque
	Jarque-Bera Normality Test
data:  x 
JB = 144.0199, p-value < 2.2e-16
alternative hypothesis: greater 
 \tabularnewline
> geary
[1] 0.711955
 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=160334&T=1

[TABLE]
[ROW][C]Skewness and Kurtosis Test[/C][/ROW]
[ROW][C]> agostino
	D'Agostino skewness test
data:  x 
skew = 0.9965, z = 3.9733, p-value = 7.089e-05
alternative hypothesis: data have a skewness 
[/C][/ROW]
[ROW][C]> anscombe
	Anscombe-Glynn kurtosis test
data:  x 
kurt = 5.8263, z = 4.8671, p-value = 1.133e-06
alternative hypothesis: kurtosis is not equal to 3 
[/C][/ROW]
[ROW][C]> jarque
	Jarque-Bera Normality Test
data:  x 
JB = 144.0199, p-value < 2.2e-16
alternative hypothesis: greater 
[/C][/ROW]
[ROW][C]> geary
[1] 0.711955
[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=160334&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=160334&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.9965, z = 3.9733, p-value = 7.089e-05 alternative hypothesis: data have a skewness
> anscombe Anscombe-Glynn kurtosis test data: x kurt = 5.8263, z = 4.8671, p-value = 1.133e-06 alternative hypothesis: kurtosis is not equal to 3
> jarque Jarque-Bera Normality Test data: x JB = 144.0199, p-value < 2.2e-16 alternative hypothesis: greater
> geary [1] 0.711955

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