日録2011年01月 - アールメカブ

アールメカブ


日録2011年01月

過去の日録

_ 2011 年 01 月 31 日 (月) 晴

  • 06:40 起床
  • 08:10 研究室
  • 午前
  • 午後

_ 2011 年 01 月 30 日 (日) 晴

  • 06:40 起床
  • 08:10 研究室
  • 午前
  • 午後
    • 夕方吹雪になった

_ 2011 年 01 月 29 日 (土) 晴

  • 06:40 起床
  • 08:10 研究室
  • 午前
  • 午後

_ 2011 年 01 月 28 日 (金) 曇

  • 05:40 起床
  • 07:20 研究室
  • 午前
    • 原稿書き
  • 午後.来客と食事
    • メモ
# 指定の長さの日付けオブジェクトを生成する
year1 <- seq (as.Date ("2000-12-1"), by = "days", length = 50)
# 期間内の各曜日の数
table (weekdays (year1))
  • 夜.隣がうるさい

_ 2011 年 01 月 27 日 (木) 晴

  • 05:40 起床
  • 07:20 研究室
  • 午前
    • 08:40-10:10
    • 校閲の仕事
  • 午後
    • 12:50-14:35 講義

_ 2011 年 01 月 26 日 (水) 晴

  • 05:50 起床
  • 07:20 研究室

_ 2011 年 01 月 25 日 (火) 晴

  • 東京から帰任
    • 統数研でマグカップを頂いた
tosuken.jpg

_ 2011 年 01 月 24 日 (月) 晴

_ 2011 年 01 月 23 日 (日) 晴

  • 東京へ向かう

_ 2011 年 01 月 22 日 (土) 晴

  • 07:00 起床
  • 08:00 研究室
  • 午前
    • C&R社の原稿
  • 午後
    • 面白い

_ 2011 年 01 月 21 日 (金) 晴

  • 07:00 起床
  • 08:00 研究室
  • 午前
    • C&R社の原稿
  • 午後.来客と食事
    • C&R社の原稿

_ 2011 年 01 月 20 日 (木) 晴

  • 05:40 起床
  • 07:00 研究室

_ 2011 年 01 月 19 日 (水) 晴

  • 05:40 起床
  • 07:00 研究室
  • 午前
    • 08:40-10:10
    • C&R社の原稿
  • 午後
    • 14:35-16:05 講義

_ 2011 年 01 月 18 日 (火) 晴

  • 05:40 起床
  • 07:00 研究室

_ 2011 年 01 月 17 日 (月) 晴

  • 07:50 起床
  • 09:00 研究室

_ 2011 年 01 月 16 日 (日) 晴

  • 05:30 起床
  • 07:00 研究室
  • 午前
    • C&R社の原稿
  • 風邪ひいたようだ.だるい

_ 2011 年 01 月 15 日 (土) 曇

  • 05:30 起床
  • 07:00 研究室

_ 2011 年 01 月 14 日 (金) 晴

  • 05:30 起床
  • 07:00 研究室
  • 午前
    • C&R社の原稿書き
  • 午後
    • けーずでんきに行ったが,S31WH はなかった

_ 2011 年 01 月 13 日 (木) 晴

  • 05:30 起床
  • 07:00 研究室
  • 午前
    • C&R社の原稿書き
  • 午後
    • 演習付き添いで脇町へ

_ 2011 年 01 月 12 日 (水) 晴

  • 05:30 起床
  • 07:00 研究室
  • 午前
    • 08:3-1010 演習
    • C&R社の原稿書き
    • 14:35-16:05 講義

_ 2011 年 01 月 11 日 (火) 晴

  • 05:30 起床
  • 07:00 研究室

_ 2011 年 01 月 10 日 (月) 晴

  • 05:30 起床
  • 07:00 研究室
  • 午前
    • C&R社の原稿書き
    • メモ

_ 2011 年 01 月 09 日 (日) 晴

  • 06:30 起床
  • 09:00 研究室
  • 午前
    • C&R社の原稿書き
    • メモ
> (x <- 2.3 - 1.3)
[1] 1
> # 厳密には1ではない
> sprintf("%.16f", x)
[1] "0.9999999999999998"
> # したがって1との比較は偽になる
> if (x >= 1) print("x >=1") else print("x<1")
[1] "x<1"
> # このような場合に「zapsmall」が使えることがある
> if (zapsmall (x) >= 1) print("x >=1") else print("x<1")
[1] "x >=1"
>

ただし注意のこと

_ 2011 年 01 月 08 日 (土) 晴

  • 05:30 起床
  • 07:10 研究室

_ 2011 年 01 月 07 日 (金) 晴

  • 05:30 起床
  • 07:10 研究室

_ 2011 年 01 月 06 日 (木) 晴

  • 04:50 起床
  • 06:10 研究室

_ 2011 年 01 月 05 日 (水) 晴

  • 05:40 起床
  • 07:10 研究室

_ 2011 年 01 月 04 日 (火) 晴

  • 06:40 起床
  • 08:10 研究室
  • 午前
    • C&R社の原稿書き
    • 午後
    • Rで括弧のヘルプがあり,その事例が興味深かった.
> ?Paren
...
Examples:

    f <- get("(")
    e <- expression(3 + 2 * 4)
    identical(f(e), e)
    
    do <- get("{")
    do(x <- 3, y <- 2*x-3, 6-x-y); x; y
    
    ## note the differences
    (2+3)
    {2+3; 4+5}
    (invisible(2+3))
    {invisible(2+3)}
    

_ 2011 年 01 月 03 日 (月) 晴

  • 08:00 起床
  • 09:40 研究室
  • 午前
    • C&R社の原稿書きを再開

_ 2011 年 01 月 02 日 (日) 晴

  • 07:00 起床

_ 2011 年 01 月 01 日 (土) 晴

  • 08:00 起床
  • 猛烈に寒い

http://yihui.name/en/wp-content/uploads/2011/01/fireworks-in-R-2011.gif

http://yihui.name/en/wp-content/uploads/2011/01/Xmas-snowflakes.gif

 
添付ファイル: filetosuken.jpg 1032件 [詳細]
 
Link: 過去の日録(4945d) R_Connection(5059d) R_sqLite_Excel(5060d)
Last-modified: 2011-02-03 (木) 11:45:06 (5032d)