[talweg.git] / data / scripts / build_testdata.R

# Only one covariable (so that the "matrix" is always invertible)

#Lundi à dimanche, 182 jours
dates = seq(as.Date("2007-01-01"),as.Date("2007-07-01"),"days")
L = length(dates) #182
exo_df = data.frame( "Date"=dates, "var"=rep(1,L), "var_pred"=rep(1,L) )
ts_df = 

# Series are 1,1,...,1 2,2,...,2 ... 7,7,...,7 1,1,...,1 ...etc
# First serie on monday 2007-01-01

#TODO:
Commit	Line	Data
	1	# Only one covariable (so that the "matrix" is always invertible)
	2
	3	#Lundi à dimanche, 182 jours
	4	dates = seq(as.Date("2007-01-01"),as.Date("2007-07-01"),"days")
	5	L = length(dates) #182
	6	exo_df = data.frame( "Date"=dates, "var"=rep(1,L), "var_pred"=rep(1,L) )
	7	ts_df =
	8
	9	# Series are 1,1,...,1 2,2,...,2 ... 7,7,...,7 1,1,...,1 ...etc
	10	# First serie on monday 2007-01-01
	11
	12	#TODO: