もうかなり昔の話になりますが.....シカの話です
2011年の春頃に論文をかき上げて、昨年ずっと投稿したけどダメだったもの。
文章の論理構成＋内容がローカル過ぎるということでリジェクトされまくっていました。
2011年3月の森林学会で発表予定だったものの発表が流れたので、研究自体まだちゃんとは陽の目をみていない。
が、そのままではデータが非常にもったいない...（なにせ5年おき15年間の毎木調査データ＋シカ食害データ）
時間はあまりありませんが、再解析＆方向転換してもう一度挑戦して見ようと思います。
（ぷらす、モニ1000がらみでこの論文が出ていると助かるので!!）
問題はモデル式をうまく書き下せるかどうか.....
週末ちょっと試してみたけど.....うまく収束せず。
もう少しまともなモデルを考えないと....
（最近ほとんどブログを更新する気力がなかったので）1ヶ月ほど前の話ですが.......
GoogleのNexus7を購入しました。
目的は論文をタブレットで読みたかったから。
購入直後にKindle Fire HDの発売が発表されたので、そちらも気になるのですが、現時点では操作性・スペック・重量ともに満足の製品です。
タブレットを購入してからは論文は主にこちらで読むようになりました。
アプリも充実していてかなり満足です。
アプリはいろいろありますが、現時点でのおすすめは
Referey + Dropbox + ezPDF Reader + ColorDict + 英辞郎データ
です。
ただし、ezPDF Readerと英辞郎のデータは有料。
ColorDictはかなり便利な辞書ソフトで、まだ試してないけど植物の学名ー和名リスト（ylistなど）も辞書として登録できる。
これは論文を読むときにはかなり便利!!
生物の学名検索は単語検索よりもめんどくさいので....
w3m -dump_source 'http://www.data.jma.go.jp/obd/stats/etrn/select/prefecture00.php?prec_no=&prec_ch=&block_no=&block_ch=&year=&month=&day=&elm=&view=' | grep prec_no | sed 's/=/ /g' | sed 's/&/ /'g | awk '{print $10}' | grep ^[1-9] | tr '\n' ' ' > prec_no.dat
for i in `cat prec_no.dat`
do
w3m -dump_source 'http://www.data.jma.go.jp/obd/stats/etrn/select/prefecture.php?prec_no='${i} | grep onmouseover= | sed 's/,/ /g' | sed 's/(/ /g' | sed 's/)/ /g' | sed "s/'//g" | awk '{print "'${i}'", $2, $3, $4, $5, $6,$7,$8,$9,$10,$11,$12,$13,$14,$15,$16,$17,$18,$19}' | uniq | sed 's/;"//g' >> prec.dat
done
for ((i=1; i< 1639; i++))
do
prec=`awk 'NR=='$i'{print $1}' prec.dat`
type=`awk 'NR=='$i'{print $2}' prec.dat`
block=`awk 'NR=='$i'{print $3}' prec.dat`
mkdir -p ./da/$prec/$block
for ((j=1980; j<2000; j++))
do
for k in 01 02 03 04 05 06 07 08 09 10 11 12
do
cd ./da/$prec/$block
w3m 'http://www.data.jma.go.jp/obd/stats/etrn/view/daily_'${type}'1.php?prec_no='${prec}'&block_no='${block}'&year='${j}'&month='${k}'&day=&elm=daily&view=p1' | grep ^[1-9] > ${prec}_${block}_${j}_${k}.dat
s=`du ${prec}_${block}_${j}_${k}.dat | awk '{print $1}'`
case $s in
0)
rm ${prec}_${block}_${j}_${k}.dat
;;
esac
echo $block $type $prec $i $j $k
cd ../../../
done
done
done
for ((i=1; i< 1639; i++))
do
prec=`awk 'NR=='$i'{print $1}' prec.dat`
type=`awk 'NR=='$i'{print $2}' prec.dat`
block=`awk 'NR=='$i'{print $3}' prec.dat`
mkdir -p ./mo/${prec}/${block}
for ((j=1980; j<2000; j++))
do
cd ./mo/${prec}/${block}
w3m 'http://www.data.jma.go.jp/obd/stats/etrn/view/monthly_'${type}'1.php?prec_no='${prec}'&block_no='${block}'&year='${j} | grep ^[1-9] > ${prec}_${block}_${j}.dat
s=`du ${prec}_${block}_${j}.dat | awk '{print $1}'`
case $s in
0)
rm ${prec}_${block}_${j}.dat
;;
esac
echo $block $type $prec $i $j
cd ../../../
done
done
