Displaying 1 result from an estimated 1 matches for "rfcovobj".
2011 Apr 20
3
Help needed!
...tt <- min(time) + (max(time) - min(time)) * (1:nbasis)/(nbasis +
1)
g <- expand.grid(t1 = tt, t2 = tt)
g$z <- 0
gg <- rbind(gg, g)
fit <- myss2d(z ~ t1 * t2, data = gg, id.basis = ((nobs +
1):(nobs + nbasis * nbasis)))
class(fit) <- "rfcovObj"
return(fit)
}
<environment: namespace:ssfcov>
Best,
Shuangyan
>