ぎょーむ日誌 2013-11-05

2013 年 11 月 05 日 (火)

• 0 時 30 分ごろとら泣き …… 一時間ほどがんばったのだけど， 着地がうまくいかづ， 敗退．
• なんかもういつごろからかわからないんだけど， 毎晩毎晩， とら (体重 10 kg) だっこスクワットを 200-400 回ぐらいやっているような気がする ……
• とら泣き前に 0600 起床． コーヒー． とら坊おきたので， ミルクをあげて Ergo おんぶ状態で朝飯・弁当の準備． とらめし． 朝飯． 0800 自宅発． 晴． 0810 保育所着． ひよこ組のこどもたちは朝から元気だな …… 0850 研究室着．
• 三連休あけばてに流されつつ， 後手後手にまわった連絡ぎょーむあれこれの ……
• 年輪論文の再計算の準備 ……
• 昼飯．
• 年輪論文の再計算の準備 ……

  xyplot(
  	EW / 252 ~ RW / 100 | factor(ID), 
  	data = d,
  	panel = function(x, y, ...) {
  		panel.points(x, y, col = "#0000ff40");
  		panel.abline(0, 1, col = "#ff4000")
  	}
  )
  

• 念のため， 問題となる個体・年を table() でカウントしておくか …… やはり， この 3 個体ね．

  > table(d$ID, d$EW / 252 > d$RW / 100)
         
          FALSE TRUE
    107      35    0
    108      35    0
    108.2    35    0
    110.2    35    0
    110.3    35    0
    110.5    35    0
    110.6    35    0
    110.7    35    0
    113      35    0
    113.2    35    0
    220      35    0
    408      35    0
    429      21   14
    439      30    5
    685      35    0
    702      35    0
    703      35    0
    731      22   13
    753      35    0
    757      35    0
  

• 予想計算終了時刻は 30 分弱， かな?
• 2200 秒で終了． 3 つに分割して並列でやらせていたんだけど， 最後の一個が遅かった …… 結果は， まあ問題なさそう ……
• 作図プログラムあれこれを動かしたり， 新しい R スクリプトを書いたり ……
• なんとかなったので， 1710 研究室発． 保育所でとら回収． 1750 帰宅． とら風呂． とらめし． 晩飯．
• とらねかしつけ． ときどき「ぎゃー」と泣いたりすることもあり， 再ねかしつけ …… まあ， 夜寝の最初の数時間は， わりと「あっさり」眠りの国に帰っていくよね．
• 真夜中をすぎたら， 危険な時間帯の始まり ……
• [今日の運動]
  • とらちゃんえくささいず．
• [今日の食卓]
  • 朝 (0720): 米 0.7 合． ネギ・ナメコ・豆腐の味噌汁． ソーセイジ．
  • 昼 (1200): 研究室． 米 0.7 合． ソーセイジ．
  • 晩 (1840): 米 0.7 合． ダイコンの葉の味噌汁． ダイコン・ニンジン・とり肉の煮物． トマトサラダ．