R Through Excel A Spreadsheet Interface for Statistics, Data Analysis, and Graphics 訳出のための覚書
Excel で範囲指定,コピーし,別セルに貼付ける画面をキャプチャする場合, PrntScrn? キーだと,範囲指定されていることを表す波線が消えてしまう.Excel のコマンドにカメラなんてものもあるのだが,あまり役に立たない.そこでWinShot で Shift + Ctril + F6 で対応.
RExcel が,ほとんどのページでは特にフォントのしていなく使われているのだが,1ページ目の6行目だけ {\sfsmall } が使われている.
ここでも掲載のコードとプロットが,ユーザーが実際に作成できるプロットと異なっていることがある.
p.298
xyplot(Shoesize ~ Size + Weight + SizeFather + SizeMother, outer=TRUE, layout=c(2, 3), skip=c(FALSE,FALSE,FALSE,TRUE,FALSE), groups=Gender, auto.key=list(border=TRUE, pch=c(17,16)), par.settings = simpleTheme(pch=c(17,16)), scales=list(relation='free', x=list(limits=list(c(132,205), c(39,150), c(132,205), c(132,205))), y=list(limits=c(34,50))), data=StudentData)
は普通の設定では pch 引数が効かないので,下のコードの結果と変わらん.
xyplot(Shoesize ~ Size + Weight + SizeFather + SizeMother, outer=TRUE, layout=c(2, 3), skip=c(FALSE,FALSE,FALSE,TRUE,FALSE), groups=Gender, auto.key=list(border=TRUE) , scales=list(relation='free', x=list(limits=list(c(132,205), c(39,150), c(132,205), c(132,205))), y=list(limits=c(34,50))), data=StudentData)
同じ図を描くには
xyplot(Shoesize ~ Size + Weight + SizeFather + SizeMother , outer=TRUE, layout=c(2, 3), pch =c(17,16), col = c(4, 6), skip = c(FALSE,FALSE,FALSE,TRUE,FALSE), groups = Gender, key=list(border=TRUE, text = list(c("female","male")), points = list(pch =c(17,16), col = c(4, 6))), par.setting = simpleTheme(pch = c(17, 16)), scales=list(relation = 'free', x=list(limits=list( c(132, 205), c(39, 150), c(132, 205), c(132, 205))), y=list(limits=c(34,50))), data=StudentData)