# NOT RUN {
l1<-"1 -1.587 -2.969 3.013 0.3 0.3 0.3 1.111 10"
l2<-"2 -1.067 2.745 2.944 0.3 0.3 0.3 1.109 10"
l3<-"3 -1.376 2.697 3.049 0.3 0.3 0.3 1.080 10"
l4<-"4 -1.663 2.922 -3.065 0.3 0.3 0.3 1.072 10"
fourhills<-c(l1,l2,l3,l4)
tf <- tempfile()
writeLines(fourhills, tf)
read.hills3d(tf, per=c(TRUE,TRUE))
# }
Run the code above in your browser using DataLab