Hi All,
con <- member <- class <- list()
for(i in 1:5)
{ con[[i]] <-
odbcConnectAccess(paste("C:/Desktop/Data/source",i,".mdb",sep
= '')) #read data from Access files
member[[i]] <- sqlFetch(con[[i]],'member') #get table data
from *.mdb files
observe[[i]] <- sqlFetch(con[[i]],'observe') #get table data
from *.mdb files
}; rm(i)
memberID <- Reduce(function(x, y) merge(x, y, all=T), member, accumulate=F)
#merge members to be unique memberID
observe <- Reduce(function(x, y) merge(x, y, all=T), observe, accumulate=F)
#merge observation data files
attach(member)
params <- glm(Ranking~Andy+Jackie+Kelly+Aaron...) #start calculation from
merged data...
output <- params$coef #get the coef of every single member
detach(member)
result <- sqlSave(con[[i]].....) #save the coef of every single member into
pre-merge source *mdb filesFrom the above coding, I got some data files from
*.mdb files and merge it to calculate, but I was wondering how to save the
result into the table of pre-merge *.mdb files.
Best Regards,
Ryusuke
http://soccer.oksport.cn
_________________________________________________________________
$B:#G/$3$=@aLs$7$h$&!*$^$:$O%M%C%HBe$+$i!#(B
[[alternative HTML version deleted]]