Use R

シリーズ物だったのね、知らんかった。

ProductName Analysis of Integrated and Cointegrated Time Series with R (Use R!)
Bernhard Pfaff
Springer New York / 7631円 ( 2008-08-11 )


ProductName Data Manipulation with R (Use R!)
Phil Spector
Springer / 7861円 ( 2008-03-19 )


ProductName Bayesian Computation with R (Use R)
Jim Albert
Springer-Verlag / ?円 ( 2007-07 )


ProductName Applied Spatial Data Analysis with R (Use R!)
Roger S. Bivand
Springer / 8586円 ( 2008-08-14 )


ProductName Applied Statistical Genetics with R: For Population-based Association Studies (Use R!)
Andrea S. Foulkes
Springer New York / 5834円 ( 2009-04-17 )


ProductName Analysis of Phylogenetics And Evolution With R (Use R)
Emmanuel Paradis
Springer New York / 6473円 ( 2006-07-28 )


ProductName Nonlinear Regression with R (Use R!)
Christian Ritz
Springer / 7631円 ( 2008-11-21 )


ProductName Wavelet Methods in Statistics with R (Use R!)
Guy Nason
Springer / 8089円 ( 2008-08-11 )


PDCAと陰陽

会社で資料をつくる時にはplan-do-check-actなPDCAサイクルを引き合いに出すことが多いのだけど、本当は陰陽マークのほうが好みだ。

yinyang

do-checkは陽でact-planは陰

陽の部分は効率化の対象になりやすく陳腐化しやすいけど、陰の部分は内に向かい経験により高いところを目指せる。

そしてヒトはdarkcoreに向かう

ProductName Warlords Rising
Future Phrophecies
Beatservice / ¥ 2,422 (2005-11-29)


Vox用のクライアント

Config::Pitエディタが立ち上がるように変更した。

サービスのURIを知るためにwgetしたらつながらなくてあせったが--auth-no-challengeオプションを入れて解決

#!/opt/local/bin/perl

use XML::Atom::Client;
use XML::Atom::Entry;
use constant NS_DC => 'http://purl.org/dc/elements/1.1/';
use File::Temp;
use File::Slurp;
use Path::Class;
use Config::Pit;

my $vox = "kzfm.vox.com";
my $title = "";
my $content = "";
my $category = "life";

my $config = pit_get($vox, require => {
        "username" => "your username on vox",
        "password" => "your password on vox",
        "postURI"  => "your potURI"
                       });


my $f = File::Temp->new();
close $f;
my $t = file($f->filename)->stat->mtime;
system $ENV{EDITOR}, $f->filename;
if ($t == file($f->filename)->stat->mtime) {
 print STDERR "No changes.";
} else {
 my @lines = read_file($f->filename);
 $title = shift @lines;
 $content = join "", @lines
}

die "content not found\n" unless $content;

my $api = XML::Atom::Client->new;
$api->username($config->{username});
$api->password($config->{password});

my $entry = XML::Atom::Entry->new;
$entry->title($title);
$entry->content($content);
my @tags = split /,/, $category;
my $dc = XML::Atom::Namespace->new( dc => NS_DC );
foreach my $tag (@tags) {
 $entry->add( $dc, 'subject', $tag);
}

my $EditURI = $api->createEntry($config->{postURI}, $entry);
print $api->errstr if $api->errstr;

pybelでRECAP

pybelでのRECAP実装が投稿されたもようだが、実際はopenbabelバインディングでの実装なのかな。

あとで試す。

シンボル、オブジェクト、シニフィエ、シニフィアン

自分で実装しながら、オブジェクトとシンボルはシニフィエ、シニフィアンの関係みたいだなぁと思ってたわけだが、既にそういう話はあった

シニフィアンのほうをいじくればesotericなlispが出来るのであろう。それは括弧でくくらなくても良くて、例えば二次元平面に描画された円で囲まれた図形がS式となってもよいのかも。その場合泡のような絵がlispプログラムになるのか。

ProductName Rubyで作る奇妙なプログラミング言語 ~Esoteric Language~
原 悠
毎日コミュニケーションズ / ¥ 2,814 ()
在庫あり。

perlでread-eval-print-loop

クォートされたS式を受け取って文字列を返すものをつくってみた。

use Term::ReadLine;
my $term = new Term::ReadLine 'Simple LISP REPL';
my $prompt = "CL-USER> ";
my $OUT = $term->OUT || \*STDOUT;

while ( defined ($_ = $term->readline($prompt)) ) {
  my $res = $_;
  warn $@ if $@;
  $res =~ s/^\'//;
  print $OUT $res, "\n" unless $@;
}

実行

$ perl s.pl
CL-USER> '(+ 1 2)
(+ 1 2)
CL-USER>

という手抜き。

だが、Readerを実装して処理させれば良いのであろう。

Junior / Royksopp

今回はエモーショナル度は若干低めだが、安定してたので、まぁまぁよかったが、、、、

ProductName ジュニア
ロイクソップ
EMI MUSIC JAPAN(TO)(M) / ¥ 2,500 (2009-03-18)
在庫あり。

ライブだとかなりよくなるんじゃないかな。行きたいなぁ富士ロック。娘が3歳にしてロックに目覚めてくれれば教育の一環としてしょうがなくついていくところなんだけどなぁ。

というわけで今はDepeche Modeの新譜が気になるのであった。

ProductName サウンズ・オブ・ザ・ユニバース デラックス盤(DVD付)
デペッシュ・モード
EMIミュージックジャパン / ¥ 3,500 (2009-04-22)
近日発売 予約可

システムバイオロジー的な世界観

ちょっと来月の頭に講演をしなきゃいけなくなったので、色々と考えていたら 、僕のシステムバイオロジー的な世界観というものは、古代インドの宇宙観にわりと近いのではないかという結論に達した。

world

  • 臓器は生体を支え
  • 細胞は臓器を支え
  • タンパク質は細胞を支え
  • ゲノム(核酸)はタンパク質を支える

つまり、ゲノムは蛇であり、量子化学的世界とはこの世の全てを取り巻くトラパーの波であり、真理なのであった。

ProductName システムバイオロジーの展開―生物学の新しいアプローチ (Springer reviews)

シュプリンガー・フェアラーク東京 / ¥ 4,200 ()
在庫あり。

ProductName 交響詩篇エウレカセブン DVD-BOX (初回限定生産)

バンダイビジュアル / ¥ 52,500 (2009-03-27)


日本文化を英語で紹介する事典

面白いのでちょこちょこと読んでる。

ProductName 日本文化を英語で紹介する事典
杉浦 洋一,ジョン・K ギレスピー
ナツメ社 / ¥ 2,079 ()
在庫あり。

パラパラめくって目についたところを読むのがいい感じ。

一方、「日本語が亡びるとき」は読み飽きてしまったのであった。

ProductName 日本語が亡びるとき―英語の世紀の中で
水村 美苗
筑摩書房 / ¥ 1,890 ()
在庫あり。

年末ばあさんが遊びに来た時に欲しそうにしてたので5月の連休にでも帰った時にあげようかな。こういうネタはあんま興味ないことに気がついた。