にはSexpr経由のtikzコマンドが含まれています

Question

Sweaveによって作成された自動レポートで基本的なグラフィックスを実装するにはtikzを使います。したがって、データに基づいてtikzコマンドを返すR関数を作成しました。私のコードは次のようになります：

<<echo=FALSE>>= 
y <- 20 
code <- cat(paste("\\draw (0pt, ",y,"pt) circle (5pt)", sep="")) 
@ 
\begin{tikzpicture} 
\Sexpr{code} 
\end{tikzpicture} 

これはうまくいきません...私は図面の代わりに文字列を取得します。

Answer 1

\Sexprを使用しないでください。ちょうどtikzpicture環境にチャンクを置き、チャンクオプションresults=texを追加してください。たとえば、

\begin{tikzpicture} 
<<echo=FALSE, results=tex>>= 
y <- 20 
cat(paste0("\\draw (0pt, ",y,"pt) circle (5pt)", sep="")) 
@ 
\end{tikzpicture} 

これはテストされていないため、少し調整する必要があります。