Free Statistics

of Irreproducible Research!

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 computationWed, 04 Dec 2013 08:10:28 -0500
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2013/Dec/04/t13861626373d9tehm8oyu13xs.htm/, Retrieved Fri, 19 Apr 2024 08:16:23 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=230586, Retrieved Fri, 19 Apr 2024 08:16:23 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact86
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [(Partial) Autocorrelation Function] [WS 9 - d en D zoeken] [2013-12-01 17:42:26] [f54a697f8d9d4d386a0fa4641cbce0b9]
- RMPD    [Skewness and Kurtosis Test] [] [2013-12-04 13:10:28] [e5eda3cc50f4d89e40bb52bce43bc7fc] [Current]
Feedback Forum

Post a new message
Dataseries X:
925.191.650.214.777
222.914.871.230.951
-371.571.787.649.763
34.224.161.696.956
-175.791.407.723.369
104.976.083.788.091
-612.440.566.193.924
-396.729.670.519.991
-39.644.439.811.595
-260.009.316.250.619
127.969.010.838.924
-36.029.843.990.865
204.138.369.304.772
442.385.868.220.351
-159.706.287.586.558
203.135.138.014.012
121.756.524.240.195
-162.019.122.127.222
-243.900.810.016.438
391.694.842.810.854
-164.230.167.509.228
293.821.184.035.543
150.197.655.607.195
-191.027.489.037.513
251.842.321.753.037
-153.374.881.204.494
818.402.596.025.766
2.761.970.369.319
749.356.404.167.146
290.310.133.584.017
154.709.015.298.645
-344.563.215.952.582
-268.812.624.669.854
308.788.007.352.866
534.487.117.440.643
309.745.158.451.437
863.072.721.974.973
-348.646.306.292.142
196.561.770.310.134
226.513.512.286.837
-188.002.590.164.262
-585.622.808.860.067
209.148.059.687.373
145.969.099.713.114
129.401.752.384.417
-330.299.340.425.404
-386.049.808.213.019
144.248.501.280.284
117.138.964.770.494
129.897.118.044.286
-152.218.688.906.803
-550.236.881.931.042
144.022.136.076.712
-16.856.654.827.111
14.468.580.457.337
-160.202.973.634.943
329.620.650.920.572
138.317.376.113.197
900.038.368.421.579
505.918.463.806.914
313.875.297.519.637
236.907.637.607.489
110.051.329.051.183
-383.848.947.462.751




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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=230586&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 Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time2 seconds
R Server'George Udny Yule' @ yule.wessa.net



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')