Skip to content

Instantly share code, notes, and snippets.

@masayukeeeee
Created October 31, 2016 15:53
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
Star You must be signed in to star a gist
Save masayukeeeee/283c11451c49f1949bbd652d1710bfa6 to your computer and use it in GitHub Desktop.
clear3d()
for(i in 1:n){
tmp1 <- map.data[[i]]
tmp2 <- data.frame(tmp1,0)
if(i==1){
plot3d(tmp2, type="l", xlim=jpn.xlim, ylim=jpn.ylim, zlim=c(0,100),xlab='', ylab='', zlab="")
}
lines3d(tmp2)
}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment