首页
学习
活动
专区
圈层
工具
发布
社区首页 >问答首页 >我怎样才能在一个表中下标一个可使用的名字()?

我怎样才能在一个表中下标一个可使用的名字()?
EN

Stack Overflow用户
提问于 2017-04-10 12:14:30
回答 3查看 10K关注 0票数 10

给定一个data.frame A,我如何使用订阅的行和列名?最后,我希望通过rmarkdown ()生成一个表(输出: word文档)。

代码语言:javascript
复制
A <- data.frame(round(replicate(3, runif(2)),2))
rownames(A) <- c("Hola123", "Hola234")
A

          X1   X2   X3
Hola123 0.47 0.55 0.66
Hola234 0.89 0.45 0.20

在创建一个可访问(A)表时,如何从已订阅的行名和列名中生成所有数字?

我试过:

代码语言:javascript
复制
rownames(A) <- c(expression(Hola["123"]), expression(Hola["234"]))
names(A) <- c(expression(X["1"]), expression(X["2"]), expression(X["3"]))

但是,当通过.rmd文件中的appears ()创建表时,它并没有出现订阅。

EN

回答 3

Stack Overflow用户

回答已采纳

发布于 2017-04-10 15:25:31

要在rmarkdown文档中添加下标,可以将文本嵌入到两个text~sub~之间。当使用函数kable时,表中的任何文本都被识别为标记语法。因此,您的重标记代码应该是:

代码语言:javascript
复制
```{r}

A <- data.frame(圆形(复制(3,runif(2)),2)

行名(A) <- c("Hola~123~","Hola~234~")

名称(A) <- c("X~1~“、"X~2~”、"X~3~")

针织品::kable(A)

代码语言:javascript
复制
票数 10
EN

Stack Overflow用户

发布于 2019-01-17 22:37:52

关于bamphe反应的一个注意事项是正确的代码被拼写错了。应该是\\textsubscript{}。它遗漏了第二个"t“。

在回答完这个问题后,您可以选择使用row.namescol.nameskable中的参数,方式如下:

代码语言:javascript
复制
A <- data.frame(round(replicate(3, runif(2)),2))

rownames(A) <- c("Hola\\textsubscript{123}", "Hola\\textsubscript{234}")

knitr::kable(A,
             row.names = T,
             col.names = c("X\\textsubscript{1}", "X\\textsubscript{2}", "X\\textsubscript{3}"),
             escape = F)
票数 6
EN

Stack Overflow用户

发布于 2021-12-19 13:03:54

我也在寻找一种方法,允许中的下标和上标,包括html格式和pdf格式,在可标记表中使用格式。经过一段时间的搜索,我终于找到了在这里由@yihue-谢:下订指南解释的文本引用方法。

(ref:foo) H~2~O,其中foo是引用,H~2~O是文本。

我的代码示例显示了如何使用文本引用。确保遵守基本规则:

  1. 在整个文档中,引用必须是唯一的。
  2. 引用不应在“要插入的内容”后面有空白。
  3. 引用需要在它自己的段落中,并且在它的上面和下面都有一个空行。

注意,只有引用的"foo“和"fo”将给出下标,而~[]~方法只在html中工作,而不使用pdf。

代码语言:javascript
复制
(ref:foo) CO~2~/CO~2~

(ref:fo) CO~2~


```{r chunk-to-show-the-text-reference-method, echo = FALSE }

图书馆(Dplyr)

图书馆(针织品)

图书馆(KableExtra)

列清单

dtmin_name <- c(“参考文献”、“制冷剂/二氧化碳”、“(参考文献:foo)”、paste0(“地面/”、“参考文献:fo”)、“地面/水”、“空气/制冷剂”、“水/制冷剂”、“水/二氧化碳”)

temp_diff <- c( 2.3、1.4、0.8、6.8、14、6、4、3.46)

创建数据和列名

dtmin_df <- data.frame(dtmin_name,temp_diff,stringsAsFactors = FALSE)

名称<- data.frame(“接口类型","dT~min~区间K",stringsAsFactors = FALSE)

名称(Dtmin_df) <-冒号

制作表

(dtmin_df,标题=“典型dT~min~温度间隔",书签=真,format.args =列表(big.mark=”,“) %>% )

kable_styling(bootstrap_options =c(“条带”,“悬停”),latex_options =c(“条带”,“scale_down”))‘

代码语言:javascript
复制
票数 2
EN
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接:

https://stackoverflow.com/questions/43322881

复制
相关文章

相似问题

领券
问题归档专栏文章快讯文章归档关键词归档开发者手册归档开发者手册 Section 归档