powered by
hdash.fun(x, hpa, basis)
data(toyapps) hdash.fun(x=1:3 , hpa=hpa.toy,basis=basis.toy) uu <- rbind(1:3,1,1:3,3:1) rownames(uu) <- paste("uu",1:4,sep="_") hdash.fun(x=uu, hpa=hpa.toy,basis=basis.toy)
Run the code above in your browser using DataLab