Free Statistics

of Irreproducible Research!

Author's title

Author*Unverified author*
R Software Modulerwasp_univariatedataseries.wasp
Title produced by softwareUnivariate Data Series
Date of computationMon, 26 Sep 2016 13:46:39 +0100
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2016/Sep/26/t1474894028f89lciion5tlmi9.htm/, Retrieved Wed, 08 May 2024 05:28:34 +0200
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=, Retrieved Wed, 08 May 2024 05:28:34 +0200
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact0
Dataseries X:
1336
1756
2279
1944
1642
2679
2690
2263
2002
2620
3694
3194
2089
2420
3108
2160
1713
1191
2897
1287
2891
2662
2440
1899
519
1079
955
684
1090
1802
1360
804
1905
1732
964
1424
661
579
378
629
737
877
746
518
1032
1227
1610
1268
935
1224
1313
1642
1431
1124
1915
1503
2035
2200
2205
2297
1818
3525
3458
3958
1987
2375
1728
1618
1614
1820
1969
1632




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

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







Univariate Dataseries
Name of dataseriesNieuwbouwwoningen; afgegeven vergunningen naar opdrachtgever, eigendomsvorm
Sourcecbs
Description In de onderstaande grafiek vindt je het aantal vergunningen er zijn afgegeven aan bouwers voor de markt in de periode 2010-2015
Number of observations72

\begin{tabular}{lllllllll}
\hline
Univariate Dataseries \tabularnewline
Name of dataseries & Nieuwbouwwoningen; afgegeven vergunningen naar opdrachtgever, eigendomsvorm			 \tabularnewline
Source & cbs \tabularnewline
Description &  In de onderstaande grafiek vindt je het aantal vergunningen er zijn afgegeven aan bouwers voor de markt in de periode 2010-2015 \tabularnewline
Number of observations & 72 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=&T=1

[TABLE]
[ROW][C]Univariate Dataseries[/C][/ROW]
[ROW][C]Name of dataseries[/C][C]Nieuwbouwwoningen; afgegeven vergunningen naar opdrachtgever, eigendomsvorm			[/C][/ROW]
[ROW][C]Source[/C][C]cbs[/C][/ROW]
[ROW][C]Description[/C][C] In de onderstaande grafiek vindt je het aantal vergunningen er zijn afgegeven aan bouwers voor de markt in de periode 2010-2015[/C][/ROW]
[ROW][C]Number of observations[/C][C]72[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=&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 dataseriesNieuwbouwwoningen; afgegeven vergunningen naar opdrachtgever, eigendomsvorm
Sourcecbs
Description In de onderstaande grafiek vindt je het aantal vergunningen er zijn afgegeven aan bouwers voor de markt in de periode 2010-2015
Number of observations72



Parameters (Session):
par1 = Nieuwbouwwoningen; afgegeven vergunningen naar opdrachtgever, eigendomsvorm ; par2 = cbs ; par3 = In de onderstaande grafiek vindt je het aantal vergunningen er zijn afgegeven aan bouwers voor de markt in de periode 2010-2015 ; par4 = 12 ;
Parameters (R input):
par1 = Nieuwbouwwoningen; afgegeven vergunningen naar opdrachtgever, eigendomsvorm ; par2 = cbs ; par3 = In de onderstaande grafiek vindt je het aantal vergunningen er zijn afgegeven aan bouwers voor de markt in de periode 2010-2015 ; 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')