r - 使用tableGrob在表中添加上标

r - 使用tableGrob在表中添加上标,第1张

如何在表格中添加上标?例如,b的列df会将重复索引指示为上标。

我可以考虑将列b的值作为表达式引入,但可能有更好的方法。

数据:

df <- data.frame( a = 1:6, b = rep( letters[1:3], each = 2 ) )

代码:

library( 'gridExtra' )
library( 'grid' )
tg_df <- tableGrob( d = df )
grid.draw( tg_df )

输出:

r - 使用tableGrob在表中添加上标,enter image description here,第2张

预期:

r - 使用tableGrob在表中添加上标,enter image description here,第3张

最佳答案:

1 个答案:

答案 0 :(得分:3)

您可以通过创建相应的plotmath上标字符串并在主题语句中指定parse=TRUE来执行此操作,以便解析表格grob中的plotmath表达式。有关其他详细信息和示例,请参阅the vignette。

# Create plotmath superscript strings
df$b = paste0(df$b,"^",rep(1:2,3))

# Define theme to parse plotmath expressions
tt = ttheme_default(core=list(fg_params=list(parse=TRUE)))

tg_df <- tableGrob(d = df, theme=tt)
grid.draw(tg_df)

r - 使用tableGrob在表中添加上标,enter image description here,第4张

本文经用户投稿或网站收集转载,如有侵权请联系本站。

发表评论

0条回复