Free Statistics

of Irreproducible Research!

Author's title

Author*Unverified author*
R Software Modulerwasp_univariatedataseries.wasp
Title produced by softwareUnivariate Data Series
Date of computationTue, 10 Feb 2009 02:42:33 -0700
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2009/Feb/10/t12342591252fmf58byer6y5ki.htm/, Retrieved Sun, 19 May 2024 01:56:36 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=37211, Retrieved Sun, 19 May 2024 01:56:36 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact202
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Univariate Data Series] [opgave 1] [2009-02-10 09:42:33] [d41d8cd98f00b204e9800998ecf8427e] [Current]
Feedback Forum

Post a new message
Dataseries X:
4283956.79
7183777·99
4583968.38
6784773.41
9785015·69
3385277.37
3387808·90
5090372.50
9794012.05
3594907.03
9095799·33
8896654.21
22100254.64
39100848·94
58101965·77
4103558.24
74104492·86
29105421.25
3106489.48
45107590·19
84110056.49
14110732·74
15111589.41
83111896·81
3114475·00
30114961.53
11115067·60
16115709.65
10116343.39
36117121.14
31117946·87
66119418.26
10121305·01
16120503·75
42119020.44
80117308.33
30119531.74
82119049.14
34118370.78
30116842·60
24114896.94
67113414.17
24111722·39
14110421.75
70110491·05
30108544.61
53106037·19
54102918.04
73104219.84
58102942.54
87101366·74
9796645.61
6091687.72
6086956·10
1685945.37
1686437.21
8587139.80
7087349·95
5786752·73
886074.15
2789146·00
4889370·14
5089425·11
9489201·56
8988986·11
7988935.99
6288845·45
2390074·93
9991714·93
7491907.69
8490806.02
6689821·50
1293059.74
6593118·58
3293172.05
2193303.86
593595.11
1492674·70
4791505·46
1092941·42
8293499·88
593076·57
9492152.61
8091675.54
7294921·20
4895098.02
6595113.57
494901·22
2994804·35
7794869.79
7694587.35
7996651·38
3098005.97
5398287·88
6898451.57
2798396.44
79102377.15
60103121·91
7103536·77
95103852·46
5104195.03
8104566·45
83105279·63
56106488.55
61106896.09
31108371·05
14109227·75
7109861.25




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time1 seconds
R Server'Gwilym Jenkins' @ 72.249.127.135

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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=37211&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 time1 seconds
R Server'Gwilym Jenkins' @ 72.249.127.135



Parameters (Session):
par1 = Opgave 1 ; par3 = evolutie ;
Parameters (R input):
par1 = Opgave 1 ; par2 = ; par3 = evolutie ;
R code (references can be found in the software module):
bitmap(file='test1.png')
plot(x,col=2,type='b',main=main,xlab=xlab,ylab=ylab)
dev.off()
load(file='createtable')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Univariate Dataseries',2,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Name of dataseries',header=TRUE)
a<-table.element(a,par1)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Source',header=TRUE)
a<-table.element(a,par2)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Description',header=TRUE)
a<-table.element(a,par3)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Number of observations',header=TRUE)
a<-table.element(a,length(x))
a<-table.row.end(a)
a<-table.end(a)
table.save(a,file='mytable.tab')