# NOT RUN {
data(dataSiland)
data(landSiland)
resF=Fsiland(obs~x1+L1+L2,data=dataSiland,land=landSiland,init = c(50),wd=20)
Fsiland.lik(resF,dataSiland,land=landSiland,varnames=c("L1","L2"),seqd=seq(5,500,length=20))
# }
Run the code above in your browser using DataLab