Free Statistics

of Irreproducible Research!

Author's title

Author*The author of this computation has been verified*
R Software Modulerwasp_univariatedataseries.wasp
Title produced by softwareUnivariate Data Series
Date of computationMon, 27 Dec 2010 13:13:03 +0000
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2010/Dec/27/t129345543313icnke4szzh7t5.htm/, Retrieved Mon, 06 May 2024 15:45:25 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=115952, Retrieved Mon, 06 May 2024 15:45:25 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact99
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Univariate Data Series] [] [2010-12-14 13:47:21] [acfa3f91ce5598ec4ba98aad4cfba2f0]
-   PD    [Univariate Data Series] [] [2010-12-27 13:13:03] [c474a97a96075919a678ad3d2290b00b] [Current]
Feedback Forum

Post a new message
Dataseries X:
35,36
31,19
35,29
33,80
36,38
37,77
34,88
37,07
35,56
34,18
32,05
32,35
34,79
33,75
33,76
36,80
36,57
34,14
33,85
35,10
33,92
33,34
30,69
32,32
32,47
34,71
37,19
35,58
36,04
35,63
32,74
33,31
28,40
27,37
28,20
29,23
28,05
27,70
28,05
28,01
30,73
30,82
30,48
30,92
31,20
31,41
31,96
36,95
35,64
37,18
38,69
39,97
40,36
40,79
42,92
41,21
44,15
44,70
47,42
45,14
46,08
50,59
48,63
47,46
47,30
49,02
51,77
54,15
56,10
52,58
52,56
51,27
57,72
53,46
55,48
59,33
57,32
56,44
58,80
55,64
53,62
54,87
56,15
55,35
52,38
51,27
53,95
56,09
56,34
60,65
58,35
57,18
58,87
66,20
62,25
62,62
54,73
56,20
52,54
63,06
63,53
60,95
53,83
51,20
44,57
44,15
44,04
42,28
38,42
35,41
37,01
39,19
46,50
44,79
47,01
49,15
50,85
54,09
55,40
56,16
54,37
52,34
56,13
51,29
42,95
28,88
38,47
34,83
41,17
40,80
40,00
44,00




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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=115952&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







Univariate Dataseries
Name of dataseriesVerloop aandeel BP (01/2000-12/2010)
SourceYahoo Finance
Description
Number of observations132

\begin{tabular}{lllllllll}
\hline
Univariate Dataseries \tabularnewline
Name of dataseries & Verloop aandeel BP (01/2000-12/2010) \tabularnewline
Source & Yahoo Finance \tabularnewline
Description &  \tabularnewline
Number of observations & 132 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=115952&T=1

[TABLE]
[ROW][C]Univariate Dataseries[/C][/ROW]
[ROW][C]Name of dataseries[/C][C]Verloop aandeel BP (01/2000-12/2010)[/C][/ROW]
[ROW][C]Source[/C][C]Yahoo Finance[/C][/ROW]
[ROW][C]Description[/C][C][/C][/ROW]
[ROW][C]Number of observations[/C][C]132[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=115952&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=115952&T=1

As an alternative you can also use a QR Code:  

The GUIDs for individual cells are displayed in the table below:

Univariate Dataseries
Name of dataseriesVerloop aandeel BP (01/2000-12/2010)
SourceYahoo Finance
Description
Number of observations132



Parameters (Session):
par1 = Verloop aandeel BP (01/2000-12/2010) ; par2 = Yahoo Finance ; par4 = 12 ;
Parameters (R input):
par1 = Verloop aandeel BP (01/2000-12/2010) ; par2 = Yahoo Finance ; par3 = ; par4 = 12 ;
R code (references can be found in the software module):
if (par4 != 'No season') {
par4 <- as.numeric(par4)
if (par4 < 4) par4 <- 12
}
summary(x)
n <- length(x)
bitmap(file='test1.png')
if (par4=='No season') {
plot(x,col=2,type='b',main=main,xlab=xlab,ylab=ylab,xaxt='n')
axis(1,at=seq(1,n,10))
}
if (par4!='No season') {
plot(x,col=2,type='b',main=main,xlab=xlab,ylab=ylab,xaxt='n')
axis(1,at=seq(1,n,par4))
grid(nx=0,ny=NULL,col='black')
abline(v=seq(1,n,par4),col='black',lty='dotted')
}
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')