# \donttest{
data(dataSiland)
data(landSiland)
resF=Fsiland(obs~x1+L1+L2,land=landSiland,data=dataSiland,sif="exponential")
plotFsiland.land(x=resF,land=landSiland,data=dataSiland)
plotFsiland.land(x=resF,land=landSiland,data=dataSiland,var=1,lw=20)
plotFsiland.land(x=resF,land=landSiland,data=dataSiland,var=2,lw=20)
# }
Run the code above in your browser using DataLab