差分
この文書の現在のバージョンと選択したバージョンの差分を表示します。
| 両方とも前のリビジョン 前のリビジョン 次のリビジョン | 前のリビジョン | ||
|
memo:r:sweave [2013/07/21 09:16] hasegawa |
memo:r:sweave [2016/07/17 04:22] (現在) |
||
|---|---|---|---|
| ライン 18: | ライン 18: | ||
| (公式サイト)[http://zrbabbler.sp.land.to/zxjatype.html] | (公式サイト)[http://zrbabbler.sp.land.to/zxjatype.html] | ||
| - | Sweaveはチャンク内に記したRコードをTeXソース中でverbatim環境（のラッパー）に出力するが，XeLaTeXではverbatim環境で日本語を使えないようだ． | + | Sweaveはチャンク内に記したRコードをTeXソース中でverbatim環境（のラッパーであるSinput環境・Soutput環境）に出力するが，XeLaTeXではverbatim環境で日本語を使えないようだ． |
| そこで，ZRさんが開発・公開しているZXjatypeパッケージを使う． | そこで，ZRさんが開発・公開しているZXjatypeパッケージを使う． | ||
| ライン 28: | ライン 28: | ||
| http://web.mit.edu/ghudson/dev/nokrb/third/tetex/texmf/tex/latex/ae/ae.sty | http://web.mit.edu/ghudson/dev/nokrb/third/tetex/texmf/tex/latex/ae/ae.sty | ||
| + | |||
| + | ダウンロードしたら | ||
| + | /usr/local/texlive/texmf-local/tex/latex/local | ||
| + | に配置し， | ||
| + | sudo mktexlsr | ||
| + | を実行 | ||
| ### Rstudio | ### Rstudio | ||
| ライン 42: | ライン 48: | ||
| ``` | ``` | ||
| - | \documentclass{article} | + | \documentclass[a4paper]{bxjsarticle} |
| \usepackage{zxjatype} | \usepackage{zxjatype} | ||
| \setCJKmainfont{HiraMinPro-W3} | \setCJKmainfont{HiraMinPro-W3} | ||
| + | \setjamonofont{Ricty} % 効いていないかも | ||
| + | \setmonofont{Ricty} % 効いていないかも | ||
| \usepackage{mediabb} | \usepackage{mediabb} | ||
| \XeTeXlinebreaklocale "ja" | \XeTeXlinebreaklocale "ja" | ||
| ライン 55: | ライン 63: | ||
| | | ||
| \maketitle | \maketitle | ||
| - | Sweaveで日本語 | + | |
| + | \section{Sweaveで日本語} | ||
| + | |||
| + | 本文はもちろん， | ||
| + | | ||
| <<>>= | <<>>= | ||
| + | cat("コード中の日本語出力も大丈夫") | ||
| + | @ | ||
| + | | ||
| + | \section{グラフにも日本語} | ||
| + | | ||
| + | <<>>= | ||
| + | par(family="HiraKakuPro-W3") # グラフに日本語を使う場合 | ||
| data <- iris | data <- iris | ||
| + | summary(data) | ||
| @ | @ | ||
| - | \begin{center} | + | |
| + | echoオプションで実行したコードを出力するかどうかを制御できる． | ||
| + | |||
| + | コードを出力しないでグラフだけを描画する場合（\tt{plot(data[,1:2])}だけを実行） | ||
| + | | ||
| <<fig = TRUE, echo = FALSE>>= | <<fig = TRUE, echo = FALSE>>= | ||
| - | par(family="HiraKakuPro-W3") # グラフに日本語を使う場合 | ||
| plot(data[,1:2]) | plot(data[,1:2]) | ||
| + | title("チャンクオプションはfig = TRUE, echo = FALSE") | ||
| + | @ | ||
| + | | ||
| + | コードを出力する場合 | ||
| + | \begin{center} | ||
| + | <<fig = TRUE, echo = TRUE>>= | ||
| + | plot(data[,1:2]) | ||
| + | title("グラフにも日本語") | ||
| + | text(x=7,y=2,"text()で日本語出力") | ||
| @ | @ | ||
| \end{center} | \end{center} | ||
| + | | ||
| + | | ||
| \end{document} | \end{document} | ||
| ``` | ``` | ||
| + | |||
| + | {{:memo:r:sweavetest.pdf|作成したPDF}} | ||
