FreeStatistics.org

Free Statistics

of Irreproducible Research!

Description of Statistical Computation

Author's title

Author*Unverified author*
R Software Modulerwasp_univariatedataseries.wasp
Title produced by softwareUnivariate Data Series
Date of computationTue, 07 Feb 2012 12:28:20 -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/2012/Feb/07/t1328635969i3o3cgg2piepz48.htm/, Retrieved Sat, 04 May 2024 18:09:38 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=161844, Retrieved Sat, 04 May 2024 18:09:38 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact164

Tree of Dependent Computations

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Univariate Data Series] [] [2012-02-07 17:28:20] [97ecbb8f45955fe09461b3e95ec17767] [Current]
Feedback Forum

Post a new message

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
 
	Bevolking op 1ste januari
2000	10239085
2001	10263414
2002	10309725
2003	10355844
2004	10396421
2005	10445852
2006	10511382
2007	10584534
2008	10665140
2009	10753080
2010	10839905
2011	10927990
2012	11017308
2013	11107066
2014	11196402
2015	11284281
2016	11369745
2017	11453079
2018	11533739
2019	11611622
2020	11686905
2021	11759088
2022	11828678
2023	11895404
2024	11959468
2025	12020779
2026	12079340
2027	12135155
2028	12188042
2029	12238266
2030	12286080
2031	12331760
2032	12375583
2033	12417729
2034	12458642
2035	12498516
2036	12537749
2037	12576606
2038	12615365
2039	12654259
2040	12693317
2041	12732618
2042	12772192
2043	12812025
2044	12852119
2045	12892420
2046	12932965
2047	12973765
2048	13014796
2049	13056066
2050	13097450
2051	13138923
2052	13180383
2053	13221821
2054	13263114
2055	13304385
2056	13345766
2057	13387379
2058	13429379
2059	13471868
2060	13515028

Tables (Output of Computation)





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

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

As an alternative you can also use a QR Code:  
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 time0 seconds
R Server'Herman Ole Andreas Wold' @ wold.wessa.net


Figures (Output of Computation)

Input Parameters & R Code

Parameters (Session):
par1 = loop van de bevolking ; par2 = statbel ; par4 = No season ;
Parameters (R input):
par1 = loop van de bevolking ; par2 = statbel ; par3 = ; par4 = No season ;
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')