Displaying 1 result from an estimated 1 matches for "hltt".
Did you mean:
hlt
2005 Nov 09
2
problem with Running Locfit
...........
xt<-read.table("x.dat",header=FALSE)
yt<-read.table("y.dat",header=FALSE)
tst<-read.table("test.dat",header=FALSE)
fitt<-locfit.raw(sapply(xt,"[",1:24),sapply(yt,"[",1:24),
deg=1,maxk=700)
fr<-fitted(fitt)
result<-fr
hltt<-predict(fitt,newdata=tst)
hltt<-predict.locfit(fitt,newdata=sapply(tst,"[",1:1))
res_tt<-hltt
cat(file="prd_model.dat",result, sep="\n")
cat(file="prd_independent.dat",res_tt,sep="\n")
Any help is much apreciated...
thanks in advance...