大那はモダン杉錦

実家に帰った時の目的に大那を買うってのがあったんだけど、取扱店を知らんのでネットで調べたら高橋酒販店を見つけたのでいってみた。

そこで色々とお話を伺って購入したのが、純米吟醸。持ち歩きすることと、初めて飲む日本酒なので四合瓶にしておいた。

1241915474

これは旨いですの。感じとしては杉錦に近い感じ。今度は一升瓶を買ってじっくり吞んでみたい。

朱に交われば赤くなる

こっちのほうがもうちょっと直接的な表現か。

愚に交われば馬鹿くなる

RでDMPK

chemoinformatics的には最もlateなフェーズである、QSPkRとかモデル動物からヒト外挿あたりにブームがやってきたので、色々と調べたりいじったりする日々を。

どっちかっていうとPK/PD,PBPKのようなモデルに興味があるのでそういったパッケージがないかと、CRANを漁った。

CRAN Task View: Analysis of Pharmacokinetic DataによるとPK/PD modelはnlmeODEパッケージを使えばいいらしい。

PBPKに関してはR-ForgeにRDynamicってのを見つけた。

ちょっとnlmeODEのサンプルを

data(Theoph)
TheophODE <- Theoph
TheophODE$Dose[TheophODE$Time!=0] <- 0
TheophODE$Cmt <- rep(1,dim(TheophODE)[1])
OneComp <- list(DiffEq=list(
dy1dt = ~ -ka*y1 ,dy2dt = ~ ka*y1-ke*y2),
ObsEq=list(
    c1 = ~ 0,
    c2 = ~ y2/CL*ke),
    Parms=c("ka","ke","CL"),
    States=c("y1","y2"),
    Init=list(0,0))
    TheophModel <- nlmeODE(OneComp,TheophODE)

Theoph.nlme <- nlme(conc ~ TheophModel(ka,ke,CL,Time,Subject),
data = TheophODE, fixed=ka+ke+CL~1, random = pdDiag(ka+CL~1),
start=c(ka=0.5,ke=-2.5,CL=-3.2),
control=list(returnObject=TRUE,msVerbose=TRUE),
verbose=TRUE)

plot(augPred(Theoph.nlme,level=0:1))

indometh

よくよく考えてみるに、既に3年くらい前にはこういうことに必要性を認識していたのだけどなぁ。

ちょっと農業してきます

田舎とのギャップが、あーーーー!なんて思ってしまうところがあり、かなり面白かった。

ProductName ちょっと農業してきます (sasaeru文庫 お 2-1)
大桃 美代子
成美堂出版 / ¥ 550 ()
在庫あり。

さて、私もとちぎのど田舎に帰省していた時に、このエントリをみながらフムーなどと思ったのだけど、ただただ東京にいるだけでは、漫然と変化に流されてしまい、淡々と変化を食わされている状態に陥るのではなかろうか?なんて思った。

まぁ芯は必要で、東京のメリットはネットワークの構築速度が速いことかなぁとか。いったんネットワークが構築されてしまえばメンテナンス自体は、グローバルなのでまぁどうでもいいかなと。田舎はネットワーク構築のチャンスが格段に低いな。一方、やる気さえみせれば(いわゆる)ハブにはすぐに到達するんではなかろうか?

あとは、成長を前提としない(または緩やかな後退を前提とした)ビジネスモデルは地方のほうがよく考えている気はする。サステイナブル?東京との温度差をうまく緩やかな成長エネルギーに向けるみたいな。特に酒なんかは地産地消の精神に東京の購買意欲を少し混ぜると良さげですよなと。

そういう意味では京都のサイズは素敵だなぁと思う。

という京都で暮らしたいなぁというネタでした。

精米

実家に帰っていたので、娘に精米するところをみせてるために近所の精米所に連れて行った。

まずは米を入れます。三歳の娘には米が白くないという事実をつきつけてびびらす。

1241599282 1241599291

70%の精米歩合でガガガガとものすごい轟音をたてながら白い米が水のように流れ出てくる。

1241599286 1241599294

娘は大はしゃぎ。足下のペダルを押すと溜まった白米がジャバジャバと袋に落ちるようなしかけ。まさにあれ、パチンコでフィーバーした時に溜めて箱に落とす感覚。まぁ、パチンコなんて10年近くやってないけど、あれみると、帰りにパチンコでも打ってイクベかみたいな気分になるんだろうか?農家のおっちゃんは。

そういえば精米歩合のところに無洗米という選択があった。あれって精米歩合なのか、、、


昔バイトで一緒になって仲良くしてた女の子が、米の研ぎ汁が白いのは洗剤で洗ってるからだと信じてたのを思い出した。米研いだことなかったらしい。

あと、実家で10坪の市民農園が当たったとか言ったら、僕の小学校の時の同級生が今20町歩の田んぼをマネジメントしているとかそういう話になったんだけど、20町歩の広さがわからんので帰ってきてから調べたら60000坪(200000平方m)とかだった。

正直広さが分からん。

京都いって講演してきた。

久々の京都。しかも今回は演者。というわけで、行きの新幹線の中ではスライドをいじってた。

ついてすぐに駅ビルの10階の京都拉麺小路の宝屋へ。

1241258892 1241258901

発表内容はこんな感じで、発表後で内容に関して質問されたので答えてたら、N君の奥さんだということが判明。っていうかN君教えてくれなかったし。他の方の発表では機能性DNAには夢を感じた。

懇親会は福幸という中華レストラン。発表者ということで偉いヒトばかりの席に座らされたのだが、理研の創設時の話とか、色々面白い話を聞けたのでおもしろかった。あと、当時の助手の先生(いま教授)に、僕の講演が元教授のほうをよく見てたらしく、研究会の発表かと思ったと言われた。自分でもそっちのほうに目がいっていたという自覚があったので、やっぱしっかり見られてたのかと(恥ずかしい)。だってこわいんだもん、N元教授。

1241258899 1241258918

1241258915 1241258920

1241258897 1241258904

1241258908 1241258894

1241258906

京都タワーでしめた。

家族が増えた

今、娘に朝ご飯食ベさせた後アイスを与えて、僕は珈琲飲みながらこれを書いてる。 救急隊員の人達には感謝してもしたりないぐらい。

  • 朝は特に何ともなくて、いつも通りの朝食。
  • 通勤途中に「お腹痛いからそろそろ病院いくわー」って電話があってから30分後に生まれた。
  • 慌てて家に戻ったら(20分ぐらい?)U隊長が破水してぶっ倒れて叫んでるし

という一時間くらいの非日常でした。

たったいま、あれやこれやを持ってこいっていうメールが入ったので、荷物を置きにいったら、そのまま会社に行く予定。

MooseでLispを実装してみる(REPL)

やさしい Lisp の作り方 by Java and by C#を参考に書いてみる。(14日目のあたり)

REPLまでやって対話環境にしてみたら、エラーが出まくる。readerよりはevaluatorまわりの気がしないでもない。なんか細かいとこから見直さないといけなさそうなのでTest::Pod::Coverageとかちゃんと通るようにという気晴らしを。

明日から、帰省するので向こうでちまちまデバッグをする予定。ゴールデンウィーク中には最後(takの実行)までは行きたい。

depeche mode

今作は出来が良い

ProductName サウンズ・オブ・ザ・ユニバース デラックス盤(DVD付)
デペッシュ・モード
EMIミュージックジャパン / ¥ 3,500 (2009-04-22)
在庫あり。

passion pitの新譜

アルバム出るのね

ProductName Manners
Passion Pit
French Kiss / ¥ 1,368 (2009-05-19)
近日発売 予約可

早速予約

passion pitはここがよくまとまってますの。

ProductName Chunk of Change
Passion Pit
French Kiss / ¥ 841 (2008-09-16)
通常1~3週間以内に発送