odbc(...) "TSconnect"(q, dbname, ...) "TSget"(serIDs, con, TSrepresentation=getOption("TSrepresentation"), tf=NULL, start=tfstart(tf), end=tfend(tf), names=NULL, TSdescription=FALSE, TSdoc=FALSE, TSlabel=FALSE, TSsource=TRUE, vintage=getOption("TSvintage"), panel=getOption("TSpanel"), ...) "TSput"(x, serIDs, con, Table=NULL, TSdescription.=TSdescription(x), TSdoc.=TSdoc(x), TSlabel.=TSlabel(x), TSsource.=TSsource(x), vintage=getOption("TSvintage"), panel=getOption("TSpanel"), ...) "TSdates"(serIDs, con, vintage=getOption("TSvintage"), panel=getOption("TSpanel"), ...) "TSdelete"(serIDs, con, vintage=getOption("TSvintage"), panel=getOption("TSpanel"), ...) "TSdescription"(x, con, ...) "TSdoc"(x, con, ...) "TSlabel"(x, con, ...) "TSsource"(x, con, ...) "TSvintages"(con)
q
is a database connection object.tfwindow
.)tfwindow
.)tfwindow
.)TSdbi-package
,
dbConnect
,
TSput
sqlQuery
require("tfplot")
## Not run:
# require("RODBC")
# setup <- RODBC::odbcConnect(dsn="test")
# TSsql::createTSdbTables(setup, index=FALSE)
# con <- TSconnect("odbc", dbname="test")
# z <- ts(rnorm(100), start=c(1975,1), frequency=12)
# seriesNames(z) <- "random1"
# if(TSexists("random1", con)) TSreplace(z, con) else
# TSput(z, con)
# z1 <- TSget("random1", con)
# tfplot(z1)
# z <- ts(matrix(rnorm(100),50,2), start=c(1975,1), frequency=4)
# seriesNames(z) <- c("random2","random3")
# if(TSexists("random2", con) |
# TSexists("random3", con) ) TSreplace(z, con) else
# TSput(z, con)
# z2 <- TSget("random2", con)
# tfplot(z2)
# TSdates("D1", con)
# TSdates("random2", con)
# TSdates(c("random1","random2","random3"), con)
# TSmeta("random2", con)
# options(TSconnection=con)
# z2 <- TSget(c("random2","random3"))
# z <- TSdates(c("D1","random2","random3"))
# print(z)
# TSmeta("random2")
# TSdelete("random1", con)
# TSdelete("random2")
# TSsql::removeTSdbTables(con, yesIknowWhatIamDoing=TRUE)
# dbDisconnect(con)
# ## End(Not run)
Run the code above in your browser using DataLab