# NOT RUN {
# }
# NOT RUN {
## This example requires that demo04cpu.r is executed first (it will write demo04cpu.RData)
path <- paste(find.package("TDMR"), "demo01cpu/",sep="/");
tdm <- list( filenameEnvT="demo04cpu.RData" ); # file with environment envT
load(paste(path,tdm$filenameEnvT,sep="/"));
# take only the first 15 records:
newdata=read.csv2(file=paste(path,"data/cpu.csv", sep=""), dec=".")[1:15,];
z=predict(envT,newdata);
print(z);
# }
Run the code above in your browser using DataLab