Free Statistics

of Irreproducible Research!

Author's title

Author*Unverified author*
R Software Modulerwasp_univariatedataseries.wasp
Title produced by softwareUnivariate Data Series
Date of computationSun, 15 Jul 2012 07:10:48 -0400
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2012/Jul/15/t1342350668492ldfev9trg7xw.htm/, Retrieved Tue, 30 Apr 2024 07:41:49 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=168804, Retrieved Tue, 30 Apr 2024 07:41:49 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywordsKhassanova Madina
Estimated Impact174
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Univariate Data Series] [Tijdreeks 1 - Sta...] [2012-07-15 11:10:48] [57781dd4fd8fc2f3d4652fc8b989af11] [Current]
Feedback Forum

Post a new message
Dataseries X:
30280
30170
30070
29860
31930
31830
30280
29240
29350
29350
29450
29660
29550
30380
30690
30380
31520
30790
29140
28730
28730
28930
28110
28730
28210
28730
29550
29860
30590
30280
28420
27690
27380
27690
27180
27380
26760
27800
28310
28420
30380
30380
27800
27180
27180
27490
26140
25520
24800
25010
25940
25210
27180
27490
25520
24800
24390
24800
23660
23250
21600
22010
22110
22220
24180
23970
21600
20560
20150
20670
18700
17360
14880
15090
15090
14880
16640
16740
14670
14260
13430
14570
12500
11260
8890
9400
8780
8990
10540
10850
9820
9710
9710
11060
8680
7130
4440
6610
6300
6410
8890
8580
7440
7960
7960
9820
7650
6410
4440
7030
6820
6920
9090
8890
8160
8270
8780
9920
8160
6720




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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=168804&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 time11 seconds
R Server'AstonUniversity' @ aston.wessa.net







Univariate Dataseries
Name of dataseriesOmzet CD-verkoop Beatles
SourceOnbekend
DescriptionDeze reeks geeft de omzet van de CD-verkoop van Beatles aan.
Number of observations120

\begin{tabular}{lllllllll}
\hline
Univariate Dataseries \tabularnewline
Name of dataseries & Omzet CD-verkoop Beatles \tabularnewline
Source & Onbekend \tabularnewline
Description & Deze reeks geeft de omzet van de CD-verkoop van Beatles aan. \tabularnewline
Number of observations & 120 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=168804&T=1

[TABLE]
[ROW][C]Univariate Dataseries[/C][/ROW]
[ROW][C]Name of dataseries[/C][C]Omzet CD-verkoop Beatles[/C][/ROW]
[ROW][C]Source[/C][C]Onbekend[/C][/ROW]
[ROW][C]Description[/C][C]Deze reeks geeft de omzet van de CD-verkoop van Beatles aan.[/C][/ROW]
[ROW][C]Number of observations[/C][C]120[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=168804&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=168804&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 dataseriesOmzet CD-verkoop Beatles
SourceOnbekend
DescriptionDeze reeks geeft de omzet van de CD-verkoop van Beatles aan.
Number of observations120



Parameters (Session):
par1 = Omzet CD-verkoop Beatles ; par2 = Onbekend ; par3 = Deze reeks geeft de omzet van de CD-verkoop van Beatles aan. ; par4 = 12 ;
Parameters (R input):
par1 = Omzet CD-verkoop Beatles ; par2 = Onbekend ; par3 = Deze reeks geeft de omzet van de CD-verkoop van Beatles aan. ; par4 = 12 ;
R code (references can be found in the software module):
par4 <- '12'
par3 <- 'Deze reeks geeft de omzet van de CD-verkoop van Beatles aan.'
par2 <- ''
par1 <- 'Omzet CD-verkoop Beatles'
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')