Sweaveとxtableで色付きのテーブルを作成する方法は?[閉まっている]


17

Sweaveとxtableを使用してレポートを生成しています。

テーブルに色を付けたいと思います。しかし、xtableで色付きのテーブルを生成する方法を見つけることができませんでした。

他のオプションはありますか?


色付きのテーブルは何ですか?背景色のセル?セルテキストの色が違う?最後のシナリオでは、ソリューションは適切なtexコマンドで値をラップしている可能性があります。
mpiktas

1行の背景を特定の色にする必要があります。xtable関数を書き換える必要がありますか?
-RockScience

1
xtableは、RパッケージHmiscのlatex関数として既に書き直されています(または、おそらく事前に書き出されています)。個人的に私は、適切に見えるテーブルのためにそれを誓います。以下に説明する派手な挿入のコツを入れる余地があるかどうかは確認していませんが、そうでない場合は驚かれることでしょう。
共役前

@Conjugateあなたは正しいですが、思ったほど簡単ではありません。あなたの提案で回答を更新しました。
chl

@chl「簡単ではない」という表現は控えめです。その機能は非常に有能ですが、獣です。
共役前

回答:


20

私はR(私は通常と直接ラテックス中の表に、プロセスを投稿してから明示的にこれをしようとしなかったものの\rowcolor\rowcolorsまたはcolortblパッケージ)、私は一緒に遊んで、これを行うのは簡単だろうと思うadd.to.row内の引数print.xtable()。基本的に2つのコンポーネント(として渡されるlist)が必要です:(1)行番号、および(2)コマンド。コマンドは指定された行の最後に追加されることに注意してください。LATEX

で、動作するようですcolortblパッケージ。だから、このようなもの

<<result=tex>>
library(xtable)
m <- matrix(sample(1:10,10), nr=2)
print(xtable(m), add.to.row=list(list(1),"\\rowcolor[gray]{.8} "))
@

私にくれます

ここに画像の説明を入力してください

(これはカスタマイズされたBeamerテンプレートですが、これは標準ドキュメントで機能するはずです。Beamerでは、おそらくtableパッケージをロードするときにオプションを追加する必要があります。)

更新:

@Conjugateの提案に従って、出力を処理するためにHmisc機能に依存することもできます。関数の多くのオプションを参照してください。使用例は次のとおりです。TEXlatex()

library(Hmisc)
## print the second row in bold (including row label)
form.mat <- matrix(c(rep("", 5), rep("bfseries", 5)), nr=2, byrow=TRUE)
w1 <- latex(m, rownamesTexCmd=c("","bfseries"), cellTexCmds=form.mat, 
            numeric.dollar=FALSE, file='/tmp/out1.tex')
w1  # call latex on /tmp/out1.tex
## highlight the second row in gray (as above)
w2 <- latex(m, rownamesTexCmd=c("","rowcolor[gray]{.8}"), 
            numeric.dollar=FALSE, file='/tmp/out2.tex')
w2
弊社のサイトを使用することにより、あなたは弊社のクッキーポリシーおよびプライバシーポリシーを読み、理解したものとみなされます。
Licensed under cc by-sa 3.0 with attribution required.