如何在表格中添加上标?例如,列b
of df
会将重复索引指示为上标。
我可以考虑引入列的值b
作为表达,但可能有更好的方法。
Data:
df <- data.frame( a = 1:6, b = rep( letters[1:3], each = 2 ) )
Code:
library( 'gridExtra' )
library( 'grid' )
tg_df <- tableGrob( d = df )
grid.draw( tg_df )
Output:
预期的:
您可以通过创建适当的plotmath上标字符串并指定parse=TRUE
在主题语句中,以便解析表 grob 中的绘图表达式。看小插图了解更多详细信息和示例。
# 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)
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)