web-dev-qa-db-ja.com

gridExtraパッケージのgrid.tableとtableGrob

gridExtraパッケージを使用してテーブルをフォーマットしようとしています。私が持っているgridExtraパッケージは2.0およびRバージョンは3.2.1です

私はここでフォーマットに関するstackoverflowの回答を調べていましたが、提案されたオプションは古いバージョンのパッケージでのみ機能するようです。例えば、

grid.table(data, h.even.alpha = 1, h.odd.alpha = 0, 
           v.even.alpha = 1, v.odd.alpha = 1, 
           gpar.corefill, gpar.coretext)

これらのオプションはすべて、最新バージョンでは「未使用の引数」として表示されます。

さらに検索すると、新しいgridExtraパッケージでは、フォーマットがおそらくテーマ内で定義されていることがわかりました。例-

tt <- ttheme_default(core=list(fg_params=list(hjust=1, x=0.95)), 
                     colhead=list(fg_params=list(col="brown"))

そしてやって

grid.table(data, theme=tt).

私が見つけられなかったのは、テーマ内のこれらのオプションがどのように定義されているか、そして古いバージョンで可能だったすべてのフォーマットをどのように実行できるかということでした。

特に、私はやりたいと思っています-

  1. 列の左揃え
  2. big.marksのコンマ（10,000として10000）
  3. 偶数行番号と奇数行番号の異なる行の色
  4. 列ヘッダーの色
  5. 行名が表示されない（row.names = FALSEのようなもの）
rgridextra
9
ashishkul

This 最近の回答はパラメータを変更する方法を示しており、Baptisteはさらなる例へのリンクを提供しています。質問で気付いたように、フォーマットを変更するには、theme引数を使用します。 ttheme_default()の出力を見ると、変更するパラメーターを確認できます。

# New theme paramters
myt <- ttheme_default(
         # Use hjust and x to left justify the text
         # Alternate the row fill colours
                 core = list(fg_params=list(hjust = 1, x=1),
                             bg_params=list(fill=c("yellow", "pink"))),

         # Change column header to white text and red background
                 colhead = list(fg_params=list(col="white"),
                                bg_params=list(fill="red"))
 )

# Example data - create some large numbers  
dat <- mtcars[1:5,1:5]
dat$mpg <- dat$mpg*1000

grid.newpage()
grid.draw(tableGrob(format(dat, big.mark=","), theme=myt, rows=NULL))

formatのbig.mark引数は、コンマ区切り文字を追加するために使用され、行名はrows=NULL引数を使用して削除されます。

enter image description here

13
user20650