Take Your Time

仕事や研究、コンピューターとの付き合い方

2013-11-01から1ヶ月間の記事一覧

Goodness-of-fitの取り出し方

R

lmの場合、summary(fit)$r.sqで決定係数、summary(fit)$adj.rで修正済み決定係数。観察数はnobs(fit)。 glmの場合、summary(fit)["null.deviance"]でNull Deviance、summary(fit)["deviance"]でResidual Deviance これとcreateTexregを合わせると相当自由に…

交差検定

R

英:Cross-validation パッケージcvToolsが使える。 線形モデルの場合、 library("cvTools") fit cv y = fit$model["y"], cost = mspe, K = nrow(fit$model)) これでone-leave-out cross-validationができる。 Kに他の数字を入れるとk-fold cross-validation…

英語でニュース

http://www.bloomberg.com/radio/ http://www.bbc.co.uk/radio/player/bbc_world_service http://www.voanews.com/

ラスベガス2日目

二日目はちょっとローキーにアウトレットとマジックショー。 アウトレットまではバスが出ている。マジックショーはペンアンドテラー。これは結構すごかった。 なんというか多芸多才でかつ想像を裏切るトリックが多くて、「鳩を出します」→鳩が出る、ではなく…

ラスベガス

シカゴ経由で。シカゴでの出発が4時間送れて午前3時着。 それでもレストランが開いているという素晴らしいナイトライフ天国。 二日目は朝からコーラの博物館で全世界のコーラを堪能。イタリアのソーダみたいなコーラが美味かった。tix4tonightで明日のチケ…

「不満」の時代

基本的に触られることが少ない所得税、下げる方向の法人税、やいのやいの言いながらも上がる方向の消費税といったように税制に関しては基本的に議論の方向性が上げるか下げるかに終始しているが、社会保障に関しては基本的に上げるものの高所得者とそれ以外…

ミッション

昔書いた雑記を整理していたら転職活動していた時の日記が出てきた。 結局転職はしなかったのだが、某コンサルのパートナー(当時はプリンシパル?とかいう役職だった)から言われた言葉が書いてあった。 「ミッションを掲げてそれに真剣になれ」 わかるよう…

元エリートという生き方

人のことをどうこう言うのは意味ないのはわかっているけど他山の石としてまとめておくのは悪いことではないと思うので書いておく。いわゆる高偏差値の大学にはいっていい会社に入った人のなかで一定数は入社10年くらいまでに若手のままドロップアウトする…

オペラ座の怪人

最高。その一言。

Tableのセルの縦位置を変えたい \shortstack裏ワザ

\shortstackはセル内で改行できる便利な道具だが、隣のセルの文章が変なことになる。そんな時\shortstack{aaaa\\{}}のように{}を後ろに入れて改行してやるとうまく表ができることがある。 \begin{tabular}{lll} \hline & A & B\\ \hline \shortstack{項目\\{…

生産的な交流、非生産的な交流

研究、仕事に煮詰まった時、ふらふらと席を立って人と話すとモチベーションなりアイデアなりが生まれることがある。生産的な交流というものは確かに存在する。何週間もうんうん唸っていていた問題も他人と話すことで一瞬で解決するような瞬間が存在する。 一…