岐阜大学位山演習林_林分材積 m^3/ha　(人工林のみ)

※事前に林班・路網図の作成を行いmap()の定義をすませておく。 川口泰平(2012)　volume<-vh*0.38*100

##### 林分材積 m^3/ha　(人工林のみ)  川口泰平(2012)　volume<-vh*0.38*100	

windows(6.5,7)　　　　　　　　　　　　　　　　　　　 ### キャンバス
load("x-y-volume.dat")　　　　　　　　　　   　　　　### データの読み込み
volume[volume==0]<-NA                                ### 0値を対象から除外
filled.contour(x,y,volume,                           ### 作図
　　　level=c(100,200,300,400,500,600,1200),        
　　　 col=c("yellow1","yellow2","yellow3","red","red1","red2","red3","red4"),
       plot.axes={axis(1);axis(2);map()},
      main=" 林分材積(人工林のみ)   m^3/ha")