Site admin: motohiro PukiWiki 1.5.1 © 2001-2016 PukiWiki Development Team. Powered by PHP 7.4.33
HTML convert time: 0.045 sec.
[[過去の日録]] * 2008年12月24日 (水) 晴 [#c70c6872] - 06:00 起床 -- 07:30 研究室着 - 午前 -- 朝から書類書き * 2008年12月23日 (火) 晴 [#bf644387] - 06:30 起床 -- 08:00 研究室着 - 午前 -- R-2.8.1が出たので [[RMeCab]]のバージョンをあげる．WindowsとLinux版[[RMeCab]]バイナリは作成した．ところが，Mac 版 R バイナリが，なお R-2.8.0 のままなので，その公開を待つしかない． - 午後 -- [[autofsの設定]] * 2008年12月22日 (月) 曇 [#b9b3875f] - 07:55 起床 -- 明け方嵐のような天気であった． -- 09:30 研究室着 - 午前 -- [[Lattice:http://www.springer.com/statistics/computational/book/978-0-387-75968-5]] - 午後 -- Suzukaをいじっておく． --， * 2008年12月21日 (日) 曇 [#ia7ffded] - 07:15 起床 -- 一日片付け --， * 2008年12月20日 (土) 晴 [#ia44abc2] - 07:15 起床 -- 09:00 研究室着 - 午前， -- LANDISK が届いたので，これを Ubuntu で mount したい．smbmount が常套手段だが，他に方法はないのかと調べ，CIFS を使うことにした．Ubuntu には入っていないので，まずは sudo apt-get install smbfs それでもって sudo mount -t cifs //***.*.***.*00/disk /mnt/landisk -o username=hoge,password=hoge, uid=hoge,gid=hoge,iochart="utf8" としたら，あっさりとマウントしてくれた．あとは いつのもように [[rsync:http://www.itmedia.co.jp/enterprise/articles/0804/21/news013.html]]で[[差分バックアップ:http://linux.paken.org/index.php?rsync%A4%C7%A4%AA%BC%EA%B7%DA%A5%D0%A5%C3%A5%AF%A5%A2%A5%C3%A5%D7]] をとる．で，fstab だが以下で良いだろうか． //***.***.*.*00/disk /mnt/landisk cifs rw,users,noauto,username=hoge,password=hoge, uid=1000,gid=1000,file_mode=0755,dir_mode=0755, iocharset=utf8 0 0 file_mode=0755,dir_mode=0755 は不要か -- ところが，ユーザーでマウントできない． ~$ mount /mnt/landisk/ mount error: permission denied or not superuser and mount.cifs not installed SUID mount.cifs のパーミッションを確認してみる． $ ls -l /sbin/mount.cifs -rwsr-xr-x 1 root root 22700 2008-07-01 00:46 /sbin/mount.cifs 変更してみると // $ sudo chmod 4755 /sbin/mount.cifs // $ ls -l /sbin/mount.cifs // -rwsr-xr-x 1 root root 22700 2008-07-01 00:46 // /sbin/mount.cifs $ sudo chmod +s /sbin/mount.cifs $ ls -l /sbin/mount.cifs -rwsr-sr-x 1 root root 22700 2008-07-01 00:46 /sbin/mount.cifs しかし，やはりmount error:．念のため $ ls -l /usr/bin/smbmount -rwxr-xr-x 1 root root 906520 2008-07-01 00:46 /usr/bin/smbmount 変更してみる $ sudo chmod u+s /usr/bin/smbmount -rwsr-xr-x 1 root root 906520 2008-07-01 00:46 /usr/bin/smbmount // $ sudo chmod u+s /usr/bin/smbmount // -rwsr-xr-x 1 root root 906520 2008-07-01 00:46 // /usr/bin/smbmount $ sudo chmod +s /usr/bin/smbmount $ ls -l /usr/bin/smbmount -rwsr-sr-x 1 root root 906520 2008-07-01 00:46 /usr/bin/smbmount 変化無し．うーん．smbmntを確認してみる $ ls -l /usr/bin/smbmnt -rwsr-xr-x 1 root root 9904 2008-07-01 00:46 /usr/bin/smbmnt // $ ls -l /usr/bin/smbmnt // -rwsr-xr-x 1 root root 9904 2008-07-01 00:46 // /usr/bin/smbmnt // $ sudo chmod +s /usr/bin/smbmnt // $ ls -l /usr/bin/smbmnt // -rwsr-sr-x 1 root root 9904 2008-07-01 00:46 // /usr/bin/smbmnt 良いと思うのだが．Googleでは[[こんなページ:http://sidux.com/PNphpBB2-viewtopic-t-8757-newlang-jpn.html]]があるのだが，上の操作を試した後では，参考にならない． -- [[ここ:http://www.debuntu.org/2006/05/31/58-how-to-smbfs-smbmnt-must-be-installed-suid-root]]をみると，smbmount にsuidは不要らしいので，default に戻しておく． $ sudo chmod u-s /usr/bin/smbmount $ ls -l /usr/bin/smbmount -rwxr-xr-x 1 root root 906520 2008-07-01 00:46 /usr/bin/smbmount smbmnt, mount.cifs, umount.cifsも結局，デフォルトの状態に戻っているのだが． -- /mnt/landisk の所有者が root になっていたので $ sudo chown ishida:ishida landisk/ を変えたら，マウント可能になった．しかし，気にいらんなぁ． - 午後 -- LANDISK へ自動的にバックアップをとりたいが，LANDISK が常にマウントされているとは限らない．そこでマウントしているかどうかをチェックした上で，rsync を実行する．マウントチェックは，こんなんで構わんかな？ if [ "`df | grep /mnt/landisk`" = "" ]; then echo "not mounted" if mount /mnt/landisk;then echo "now mounted" else echo "cant mounted" exit 1; fi else echo "already mounted" fi あるいは，もっと簡単に if [ "`df | grep /mnt/landisk`" ]; then echo "already mounted" else if mount /mnt/landisk;then echo "now mounted" else echo "cant mounted" exit 1; fi fi * 2008年12月19日 (金) 雨・晴 [#zc5e63ba] - 06:15 起床 -- 07:30 研究室着 - 午前 -- [[RMeCab]]のインストールガイドなどを書き直した．zipファイルの解凍方法などを追加． - 来客と昼食 -- [[RMeCab]]のインストールガイドなどを書き直しを続ける．ちょっと説明が過ぎるんじゃないかとも心配になるが，いくら説明しすぎても，しすぎることはないという考え方もあるだろう． -- ， * 2008年12月18日 (木) 晴 [#d9e62ca0] - 06:15 起床 -- 07:30 研究室着 - 午前 -- 朝一で郵便の発送． -- LaTeX の makeindex で，漢字を指定する場合，読み仮名から濁音などを省く処理を長いこと続けている．すなわち「漢字」であれば以下のようにしているのだが， \index{かんし@漢字} ふっと，この根拠は何なのだろうか．検索すると，濁音をそのまま利用している例もあるのだが． \index{かんじ@漢字} - 午後 -- [[Lattice:http://www.springer.com/statistics/computational/book/978-0-387-75968-5]] 原著ソースにある Sweave 系のディレクティブだが，変更せず，そのまま使うことに決める．これまで訳した部分の修正を開始． * 2008年12月17日 (水) 曇 [#le6657fc] - 06:30 起床 -- 07:40 研究室着 - 午前 -- [[こういうページ:http://phoenixx.sakura.ne.jp/R/wiki.cgi?page=BugTrack%2D%A3%D2%C8%F7%CB%BA%CF%BF%2F14]]があった．Rserveの試行例が書いてある． -- 二三の細々した用事を片付ける． -- T氏とベキ乗モデルの話．モデルを見直して，ロジットに落ち着くべきか？ - 午後 -- Comparative Box-and-Whisker Plots という言葉があるのだが，これは要するに Box-and-Whisker Plots を複数並べて比較しやすくしたと言うことか．Comparison boxplot という表現もあるが．比較と訳すのも芸がないので，対照箱ひげ図？ -- 充電 --， * 2008年12月16日 (火) 晴 [#f2a689d7] - 06:30 起床 -- 07:40 研究室着 - 午前 -- [[RMeCab]] のインストール方法について書き直し，修正ファイルを関連ページに反映させる． -- Wedderburn rank reduction #mimetex(E = A - \omega^{-1} (Ax) (y^T Y); rank(E) = rank(A)-1) where #mimetex(\, \, \, \, \, \omega = y^T A x, x \in R^n, y \in R^m ) - 午後 -- [[Lattice:http://www.springer.com/statistics/computational/book/978-0-387-75968-5]] のソースで定義されている newcommand だが，使ってしまうかな？ * 2008年12月15日 (月) 晴 [#ke6e9f47] - 08:30 起床 -- 09:50 研究室着 - 午前 -- ''fractional number'' 「分数」というと，私などはついつい分母の上に分子が乗った形，例えば &mimetex(\frac{1}{2}); をイメージしてしまうのだが，英語圏の本を見ていると，英語のネーティブらは，むしろ小数 0.5 を思い浮かべるような気がする． - 午後．工学部で栄養420．目玉焼きののったハンバーグとポテトサラダ，味噌汁，ご飯． -- 日韓比較データの分析 -， * 2008年12月14日 (日) 曇・晴 [#td309cf5] - 07:40 起床 -- 一日仕事 * 2008年12月13日 (土) 晴 [#ke6e9f47] - 07:40 起床 -- 09:00 研究室着 --一日仕事 -- [[Lattice:http://www.springer.com/statistics/computational/book/978-0-387-75968-5]] に取りかかる．原著ソースが届いたので，訳出作業と平行して \index を追加し始める．原ソースには \addindex と \index が混在しているので，見にくい． * 2008年12月12日 (金) 晴 [#o8c9c324] - 06:00 起床 -- 07:30 研究室着 - 午前 -- T氏とデータの分析方法について雑談 -- 10:25-11:55 講義 -- [[RMeCab]]のデータセットを作成し直した． - 午後．来客と食事 -- 午後から連続で演習 -- 重力モデルとハフモデルについてちょっと調べた -- シャンペンを少々飲んで就寝 --， //http://www.orsj.or.jp/~archive/pdf/a_a/2004A_080.pdf //http://www.soc.titech.ac.jp/~library/discuss/text/dp04-04.pdf //http://www.cneas.tohoku.ac.jp/labs/dsese/mokmrp1/to0709.pdf //http://www.iwate-pu.ac.jp/home/takasima/paper/D01/D04.doc //http://okwave.jp/qa2183325.html * 2008年12月11日 (木) 晴 [#sd30dab2] - 06:00 起床 -- 07:30 研究室着 - 午前 -- 朝一で，献本の発送を行った． // 15部，宛名シールが840円，梱包封筒が3*5*100円，郵送費が4350掛かった．送ったのは，1 金，2 村上，3 中野，4 前田忠彦 （統計数理），5 小野 芳彦，6 小杉 考司，7 大津起夫，8 影浦 峡 ，9 豊田 秀樹，10 岡田 昌史，11 中間 栄治， 12 牧山 文彦，13 伊藤雅光，14 荻野蔵男（日大文理学部），15 小林の15名，学内便で 16 工学部 任，学内で 17 岸江，18 掛井，19 板東，そして 20 家内 -- 10:25-12:00 演習 - 午後 -- 昨日届いた，[[Lattice:http://www.springer.com/statistics/computational/book/978-0-387-75968-5]] のソース一式を改めて眺める．複雑だなぁ．コンパイルにはSweaveを使っている． -- 日本酒を少々飲んで就寝 --， * 2008年12月10日 (水) 晴 [#y9e0530c] - 06:00 起床 -- 07:30 研究室着 - 午前 -- 08:35-10:10 演習 -- 献本の準備 - 午後 -- 12:50-16:05 講義 -- 『[[Rによるテキストマイニング入門:http://www.amazon.co.jp/R%E3%81%AB%E3%82%88%E3%82%8B%E3%83%86%E3%82%AD%E3%82%B9%E3%83%88%E3%83%9E%E3%82%A4%E3%83%8B%E3%83%B3%E3%82%B0%E5%85%A5%E9%96%80-%E7%9F%B3%E7%94%B0-%E5%9F%BA%E5%BA%83/dp/4627848412/]]』森北出版，2008.12 が届いた． -- 日本酒を少々飲んで就寝 --， * 2008年12月9日 (火) 晴 [#re46d2cc] - 06:00 起床 -- 07:30 研究室着 - 午前 -- RjpWiki Q＆A初級者コースに vistaは基本的にC:\Program Files、 C:\直下には書き込み権限はありません。 とあった．たまにVistaでRを使ってみるが，パッケージをインストールする際，管理者なのホームフォルダを明示してやらにゃいかんのかぁ！？，と思っていた． - 午後 -- [[U・リゲス著『''Rの基礎とプログラミング技法''』:http://www.springer.jp/japan/math/j71218.html]]の四刷発行の連絡が編集部より届く．修正必要な箇所がなかったチェックを開始する． --， * 2008年12月8日 (月) 晴 [#n2f7df44] //工学部でスペシャル400．トンカツにキャベツ，豚汁，ご飯． * 2008年12月7日 (日) 晴 [#wac9eeac] - 07:30 起床 -- 携帯の電源切れたが，時間がなかったので，とりあえず1時間ほど充電． -- 午前中，サーバーを設定した部屋で停電があった模様で，サーバーが落ちてしまっていた．そういえば，そういう通知があったな．忘れてた． --， * 2008年12月6日 (土) 晴 [#ld9768f2] - 07:00 起床 -- 午前中，[[IASC2008:http://jasp.ism.ac.jp/~iasc2008/]]で発表があるのだが，プレゼンは共同研究者に任せ，Rのセッションを見に行く．最後のSimon Urbanek による FastRWeb: Fast Interactive Web Framework for Data Mining Using R が特に印象深かった． -- 共同発表者の用事を済ませたが，みなとみらい周辺に馴染みはない．東横線で渋谷まで出て，そこからさらに乗り継いで，久しぶり藪蕎麦にいった．15時だというのに込んでいる．日本酒のお燗と突き出し類はうまいのだが，肝心の蕎麦の味がひどく落ちている気がする．ぶつぶつ言いながらも，3合ばかり飲んで，赤坂のホテルに移る． * 2008年12月5日 (金) 雨 [#vd3a2d09] - 07:00 起床 - 12時の飛行機で東京へ - 14時時半頃，横浜． -- 地方で暮らすようになるまでは，しばしば横浜周辺には出かけていたものだが，みなとみらい線には乗ったことがない．みなとみらい駅を出てみると，ものすごい強風である．パシフィコ横浜に隣接するホテルに宿泊．チェックイン後，外を見ると大変な大雨である． -- 今頃，Rのチュートリアルが開催されているはずだが，他の用事で参加できず． -- ホテル内で， 『[[Rによるテキストマイニング入門:http://www.amazon.co.jp/R%E3%81%AB%E3%82%88%E3%82%8B%E3%83%86%E3%82%AD%E3%82%B9%E3%83%88%E3%83%9E%E3%82%A4%E3%83%8B%E3%83%B3%E3%82%B0%E5%85%A5%E9%96%80-%E7%9F%B3%E7%94%B0-%E5%9F%BA%E5%BA%83/dp/4627848412/]]』森北出版用データをもう一度実行し直してみた． * 2008年12月4日 (木) 晴 [#bc4500ac] - 06:00 起床 -- 07:30 研究室着， - 午前 -- 朝いちで，昨日の日本語アンケートデータの分析を続ける．レポート担当のB君のために，[[多重ロジットモデルの結果の解釈方法>R_multinom]]を，説明したメモを書く．明日から学会なので，口頭で説明する余裕がない． -- 10:25-12:00 演習 - 午後． K 氏，N 氏らと近くのファミレスに．ハンバーグランチ523円なり． //工学部でスペシャル400，鳥南蛮とご飯と味噌汁 -- Elecomのブックスタンド EDH-004 を買ってみた．[[Lattice:http://www.springer.com/statistics/computational/book/978-0-387-75968-5]]などの原稿書きを進めるのに，いくつかの本を開きっぱなしに作業しなければならないので，役に立つかもしれないと思ったのだが，結構よさそう． * 2008年12月3日 (水) 晴 [#nb0805ad] - 06:00 起床 -- 07:30 研究室着 - 午前 -- 今日も一日授業の日だが、合間を縫って、日本語アンケートデータの分析。分析だけではなく、結果をレポートする担当の方のために、解説も書かなければならない。 -- 08:30-10:30 演習 - 午後 -- データフレームをランダムに二つに分ける処理って、[[こうする>R_sample]] 以外に、もっと簡単な手があった気がするんだが。。。 -- 12:55-16:05 講義 -- 18:00-19:30 演習 -- 面白そうな R パッケージが公開されている． New Rcpp versions 0.6.0 and 0.6.1 --------------------------------- The Rcpp package provides C++ classes that greatly facilitate interfacing C or C++ code in R packages using the .Call() interface provided by R. Rcpp provides matching C++ classes for a large number of basic R data types. Hence, a package author can keep his data in normal R data structure without having to worry about translation or transfer to C++. At the same time, the data structures can be accessed as easily at the C++ level, and used in the normal manner. The mapping of data types works in both directions. It is as straightforward to pass data from R to C++, as it is it return data from C++ to R. The following two sections list supported data types. Transfer from R to C++: Standard R datatypes that are understood in C++ are o named lists containing numeric (i.e. floating point), integer, character, logical (i.e. boolean) or Date and Datetime (i.e. POSIXct at the microsecond granularity) arguments; o data frames containing numeric, integer, logical, character, Date, Datetime or Factor columns; o named vectors containing numeric or integer values, o vectors and matrices of different values o character strings Transfer from C++ to R: Standard C++ datatypes can be returned to R in a named list, the most general data type in R. Permissible components of the returns list are the following C++ types: o double (scalar as well as vectors and vectors of vectors), o int (scalar as well as vectors and vectors of vectors), string, o STL vector types and vector<vector> types of int and double o STL vector of strings o internal Rcpp types RcppDate, RcppDateVector, RcppDatetime, RcppDatetimeVector, RcppStringVector, RcppVector of int or double, RcppMatrix of int or double, RcppFrame Rcpp was initially written by Dominick Samperi as part of his contributions to RQuantLib, and later released as a standalone package (under both the Rcpp and RcppTemplate names). Its development had ceased in late 2006. As of November 2008, I have made new release with substantially expanded documentation, simpler yet more comprehensive build structure leading to easier use of Rcpp from other packages, and support for Windows, Linux and Mac OS X (with special thanks to Simon for some extended cluebat waving). More information for Rcpp can be found at o the package homepage at http://dirk.eddelbuettel.com/code/rcpp.html o the R-forge repository at https://r-forge.r-project.org/projects/rcpp/ o the CRAN page at http://cran.r-project.org/web/packages/Rcpp/index.html Regards, Dirk -- すき焼きで獺祭を一杯 * 2008年12月2日 (火) 晴 [#wd9373f6] - 06:00 起床 -- 07:30 研究室着 - 午前 -- 昨日の午後から，花粉症の症状がひどい．例年は，年明けぐらいからなんだけど，，， -- [[Lattice:http://www.springer.com/statistics/computational/book/978-0-387-75968-5]] にタイタニックのデータがあった，等級ごとの生存割合をみるには，モザイクプロットより分かりやすい気がする． > barchart(Class ~ Freq | Sex + Age, data = as.data.frame(Titanic), groups = Survived, stack = TRUE, layout = c(4, 1), auto.key = list(title = "Survied", colums = 2), scales = list(x = "free") ) - 午後 -- 14:35-18:30 演習 --、 * 2008年12月1日 (月) 晴 [#w2a26a85] - 06:00 起床 -- 07:30 研究室着， - 午前 -- [[Lattice:http://www.springer.com/statistics/computational/book/978-0-387-75968-5]] を翻訳していると，目から鱗という機能が山ほどあることに気がつく． -- Atok for Linux を Emacs 上で使って原稿書いているんだが，時々，Atok がフリーズすることがあって，そんな場合 Emacs ごと落とす羽目になるので，厄介だ． - 午後 ひたすら[[Lattice:http://www.springer.com/statistics/computational/book/978-0-387-75968-5]] ． -- 急に花粉症風の症状が出てきた．何で，突然？ -- ''latice'' パッケージの関数は，引数の指定が正しくない場合，妙なエラーや，あるいは妙なグラフを作成している．それはそれで面白いけど． key.variety <- list(space = "right", text = list(levels(Oats$Variety)), points = list(pch = 1:3, col = "black")) xyplot(yield ~ nitro | Block, Oats, aspect = "xy", type = "o", groups = Variety, key = key.variety, lty = 1, pch = 1:3, col.line = "dargrey", col.symbol = "black") darkgrey の綴りを間違えて指定すると，グラフは作成されるものの，折れ線の代わりに，「パラメータの設定がおかしいだろう！」というメッセージがずらずらと表示されてしまう． また引数名と間違えると，その引数に設定したオブジェクトがないだろうなどというエラーに遭遇する． dotplot(variery ~ yield | site, barley, layout = c(1,6), aspect = c(0.7), grous = year, auto.key = list(space = "right") ) 以下にエラー bwplot.formula(x = variery ~ yield | site, data = list(yield = c(27, : オブジェクト "year" は存在しません groups の綴りを間違えたんだけど．．．