##### 林相(森林タイプ)
windows(5.2,7)　　　　　　　　　　　　　　　　　　　　　### キャンバス
load("x-y-forest-dftype.dat")　　　　　　　　 　　　　　### データの読み込み
image(x,y,forest,col=dftype$color)　　　　　　　　　　　### 作図
legend(3200,-200,dftype$t,fill=dftype$color,cex=0.6) 　 ### 凡例
map(col2="white")                                       ### 林班・路網
box()                                                   ### 枠線