ぎょーむ日誌 2009-01-05

2009 年 01 月 05 日 (月)

• 0830 起床． うーむ． 朝飯． コーヒー． 0915 自宅発． 雪． 0930 研究室着．
• いきなり研究室雑用にまきこまれる．
• 次に保要さんとサロベツの モウセンゴケ のデータ解析相談． ふーむ， 結実数に関してかなり個体差 (シュート差) があり， さらにその中に大きな花差がある． すごいねえ …… とりあえず， 本日は統計モデリングにさきだって， データをこういうふうに整理してください， といったハナシで終了．
• 次． 地衣類繁殖論文原稿の修正． えーと …… どうもこれは The Lichenologist に accept されたっぽいのだけど， まだ受理通知はとどいていない． 例によって例のごとくノッティンガムから航空便なんかで送られてきたんだけど， 年末年始の混乱の中をさまよっているのだろう， と思いたい． で， なんで「修正」が必要かと言えば， とーとつに Chief Editor 氏から 「いまおたくらの論文を印刷屋にまわそうとしてるんだけど， あいかわらず意味不明な文章がいくつかあって……」 という (なんと!) 電子メイルをいただいてしまったのだ． あいてぃーな仕組みなんぞ使うのは伝統ある英国地衣類学会誌には ふさわしからぬコトであるといった態度をつらぬくかのように見える あの The Lichenologist から電子メイルですよ! …… まあ， ぢつは The Lichenologist web site だの同学会 site なんかはあったりするんだが ……
• ともあれ， 志水さんは本日より数日間にわたって日高山地 ペテガリ岳 早大尾根 の厳冬期登攀にいどまれるわけだし， 私が対応することに．
• 編集長 Crittenden さんに修正文案のメイルを送信． おそい昼飯． それにしてもいちいち編集長がちゃんと原稿をチェックする丁寧さよ． 査読者氏も文章のまずさに関してはしつこく指摘してくれたなぁ．
• 窓の外は風雪． ときどき晴． 日本海側ってこういう天気だったかなぁ．
• 松田君とテングザル論文の修正について議論． 8 日から月末までまたマレイシア・サバ州ですか ……
• その後は保要さんとモウセンゴケ解析のつづき． 統計モデリング前の data.frame 整理， という作業段階なんだけど， 技術的にはこのあたりが一番難しいのかも． R の data.frame わざコンビネイションわざが要求される． たとえば， 「花茎数が 1 の個体の花茎のみ」 かつ 「花茎内の花数が 1 の花茎のみ」 かつ 「花茎の一番下の花の種子数がゼロである花茎のみ」 かつ 「ただし個体番号 a14 の花茎は除く」 といった条件をみたす花茎を data.frame 中から選抜せよ， といった問題， このへんの大学院生のうち何人が自力でできるだろう， と考えつつ R プログラミング． 複合条件はたんに logical vector の積でよいのだけど， 上記の諸条件の logical vector 生成に apply 系関数の応用が必要とされるんだよね …… たぶん， このあたりが難所．
• ゑくせるなヒトたちに共通するクセとして 「データを横に横に追加していく」 といった症状がある． R ではこれに対処するために reshape() なる関数があるのだが …… えーい， 今回も細かいところで手こずってしまった． 列名に id があるとエラーがでる， とか． これは idvar オプションで対処する …… といったことを reshape(data.frame) に追記． いつものことながら，
• 院生にはキタえられる．
• とゆーことで本日は統計モデリング前のデータ変換だけで終了． まあ， どの院生したうけであってもここがたいへんなのはいつものことだ． 1850 研究室発． 1905 帰宅． うんどう． 体重 71.2 kg． 晩飯の準備． 晩飯．
• [今日の運動]
  • 腹筋運動 30 × 3 回． 背筋運動 30 × 3 回． 腕立ふせ 10 × 3 回． エアロバイク 30 分間． ストレッチ．
• [今日の食卓]
  • 朝 (0840): 米麦 0.6 合． キャベツ・ニンジン・ブロッコリー・ソーセイジの酒蒸し．
  • 昼 (1400): 研究室． 米麦 0.8 合． キャベツ・ニンジン・ブロッコリー・ソーセイジの酒蒸し．
  • 晩 (2100): 米麦 0.6 合． キャベツ・ニンジン・ブロッコリー・ソーセイジの酒蒸し． コンニャクのショウガ煮． ヨーグルト．