Displaying 1 result from an estimated 1 matches for "apwd".
Did you mean:
apmd
2010 Apr 02
2
How to save a model in DB and retrieve It
...ms, air_kgm3, wind_dg)
windDat[windDat$wind_ms < 3, 'kw'] <- 0
model <- loess(kw ~ wind_ms + air_kgm3 + wind_dg, data = windDat, enp.target = 10*5*3) #, span = 0.1)
modX <- serialize(model, connection = NULL, ascii = T)
Channel <- odbcConnect("someSysDSN; UID=aUid; PWD=aPwd")
sqlQuery(Channel,
paste(
"INSERT INTO GRT.GeneratorsModels
([cGeneratorID]
,[tModel]
VALUES
(1,",
paste("'", gsub("'", "''", rawToChar(modX)), "'", sep = ''),...