スポンサーサイト

上記の広告は1ヶ月以上更新のないブログに表示されています。
新しい記事を書く事で広告が消せます。

白抜き線の描画

data <- readShapeLines("a001350020120307", proj4string=CRS("+proj=longlat"))
pdf("doublelinetest_29Apr2014.pdf",height=5.5,width=6,pointsize=14)
plot(data, col="red", xlim=c(131.1, 131.3), ylim=c(34.4, 34.5), lwd=4)
par(new=T)
plot(data, col="white", xlim=c(131.1, 131.3), ylim=c(34.4, 34.5), lwd=2.0)
dev.off()
スポンサーサイト

コメントの投稿


非公開コメント

コメント

Profile

zoa

Author:zoa
Metropolis (1927)

Calendar
05 | 2017/06 | 07
- - - - 1 2 3
4 5 6 7 8 9 10
11 12 13 14 15 16 17
18 19 20 21 22 23 24
25 26 27 28 29 30 -
Labels
Admin
Previous Posts
Recent Comments
Recent Trackback
Archive
このページのトップへ
上記広告は1ヶ月以上更新のないブログに表示されています。新しい記事を書くことで広告を消せます。