メモ

R5クラスの継承の罠

あ...ありのまま 今 起こった事を(ryR5クラスでサブクラスを定義すると、スーパークラスがインスタンス化されます。な… 何を言っているのか(ry 本当に意味が分からないです。 setRefClass("Parent", methods=list( initialize = function()print("run"))) se…

memiscパッケージのrecodeのバグ

追記(2011/11/07):memisc(0.95-35)で修正されました。memisc(0.95-33)のrecode関数にはバグがある模様。 > library(memisc) > x <- 1:100 > y <- recode(x, "low" <- range(min, 30), "hi" <- range(31, max)) > x[1:10*3] <- NA > z <- recode(x, "low" …

コマンドのみペースト

Windows限定? > x <- 1 + 2 > x [1] 3 > y <- x * 10 > y [1] 30 > x + + y + + 10 [1] 43 こんなふうに,ブログとかPDFとかに実行結果が貼り付けてあって,元のスクリプトがない場合がありますよね。 いままではエディタに貼り付けてからちまちまと頭の記…

Rの関数のhelpをcharacterとして取得する方法

表題のことがやりたくて,かなりさまよったのでメモ。まず,help()は返り値としてhelp_files_with_topicクラスを吐く。invisible()で返すようになっているので,変数に付値しなければ見えない。ただ,help_files_with_topicクラスの実体は関数のヘルプの位置…

latticeパッケージのplotで画面の分割

明示的にprintで描画し,オプションで指定する。 fac1 <- factor(c(rep(1,1), rep(2,2), rep(3,3))) fac2 <- factor(c(rep(1,3), rep(2,2), rep(3,1))) print(histogram(fac1), more=TRUE, split=c(1,1,2,1)) # split=c(行方向の描画位置, 列方向の描画位置,…

グラフィックスの保存と日本語フォントの指定(eps,pdf)

最近のRはフォントを指定しなくても(多分)ちゃんと日本語を出してくれる。 ただ,ゴシックか明朝かを指定したい場合がある。 dev.copy2eps(file="ファイル名.eps", family="Japan1HeiMin") # 他に指定できるのは"Japan1","Japan1HeiMin", # "Japan1Gothi…

latticeパッケージのplotを白黒にする

メモ。白黒かつ背景は透明。 library(lattice) ltheme <- canonical.theme(color = FALSE) ## in-built B&W theme ltheme$strip.background$col <- "transparent" ## change strip bg lattice.options(default.theme = ltheme) ## set as default ソース