Create a gist now

Instantly share code, notes, and snippets.

What would you like to do?
for(i in 1:n){
tmp1 <- map.data[[i]]
if(i==1){
plot(tmp1, type="l", xlim=jpn.xlim, ylim=jpn.ylim, xlab='', ylab='')
}
lines(tmp1)
}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment