首页
学习
活动
专区
圈层
工具
发布
首页
学习
活动
专区
圈层
工具
MCP广场
社区首页 >问答首页 >在Rmarkdown生成的HTML中并排放置Kable之后,r删除标题行

在Rmarkdown生成的HTML中并排放置Kable之后,r删除标题行
EN

Stack Overflow用户
提问于 2022-02-09 12:42:08
回答 1查看 377关注 0票数 0

我使用Rmarkdown生成一个HTML,其中两个kables使用kable::kables并排放置。但是,在并排的kables上方有一条额外的线,我想移除。我读过“kableExtra文档”,但似乎他们没有报道这个问题。

我想移除的水平线用下面的红色箭头表示。

以下是我的Rmarkdown代码供您参考:

代码语言:javascript
运行
复制
---
title: "Untitled"
author: "benson23"
output:
  html_document:
    theme: default
    toc: yes
    toc_depth: 4
    toc_float: true
    code_folding: hide
---

```{r setup, include=FALSE}

knitr::opts_chunk$set(echo =真)

图书馆(Tidyverse)

图书馆(Rmarkdown)

图书馆(KableExtra)

图书馆(针织品)

代码语言:javascript
运行
复制
## Help with Kable

As you can see, there's an extra line above the aligned tables, which I would like to remove.

```{r kable_extra_line}

df1 <- Ti球(Dummy= c(90748,91006,90748,91006),

代码语言:javascript
运行
复制
                   A = c(0, 6, 1, 110), 
代码语言:javascript
运行
复制
                   B = c(8, 0, 339, 0), 
代码语言:javascript
运行
复制
                   C = c(6, 7, 909, 309), 
代码语言:javascript
运行
复制
                   D = c(0, 0, 0, 0))

df2 <- Ti球(Dummy= c(90748,91006,90748,91006),

代码语言:javascript
运行
复制
                   A = c(0, 901, 0, 50), 
代码语言:javascript
运行
复制
                   B = c(0, 1, 122, 0), 
代码语言:javascript
运行
复制
                   C = c(1847, 1, 754, 625), 
代码语言:javascript
运行
复制
                   D = c(1, 0, 0, 0))

表(表)

kable(df1) %>%

代码语言:javascript
运行
复制
kable_styling(bootstrap_options = c("striped", "bordered"),
代码语言:javascript
运行
复制
              full_width = F) %>%
代码语言:javascript
运行
复制
row_spec(0, bold = T) %>%
代码语言:javascript
运行
复制
pack_rows("Pack some rows here", 1, 2, 
代码语言:javascript
运行
复制
          label_row_css = "background-color: #666; color: #fff;") %>%
代码语言:javascript
运行
复制
pack_rows("Pack some rows here", 3, 4, 
代码语言:javascript
运行
复制
          label_row_css = "background-color: #666; color: #fff;"),

kable(df2) %>%

代码语言:javascript
运行
复制
kable_styling(bootstrap_options = c("striped", "bordered"),
代码语言:javascript
运行
复制
              full_width = F) %>%
代码语言:javascript
运行
复制
row_spec(0, bold = T) %>%
代码语言:javascript
运行
复制
pack_rows("Pack some rows here", 1, 2, 
代码语言:javascript
运行
复制
          label_row_css = "background-color: #666; color: #fff;") %>%
代码语言:javascript
运行
复制
pack_rows("Pack some rows here", 3, 4, 
代码语言:javascript
运行
复制
          label_row_css = "background-color: #666; color: #fff;")

) %>%

kable_styling()

代码语言:javascript
运行
复制

如果你知道如何移除这条线,那就太好了!

EN

回答 1

Stack Overflow用户

回答已采纳

发布于 2022-02-09 12:49:24

您可以添加css .kable_wrapper { border: hidden;}

代码语言:javascript
运行
复制
---
title: "Untitled"
author: "benson23"
output:
  html_document:
  theme: default
toc: yes
toc_depth: 4
toc_float: true
code_folding: hide
---
  
```{r setup, include=FALSE}

knitr::opts_chunk$set(echo =真)

图书馆(Tidyverse)

图书馆(Rmarkdown)

图书馆(KableExtra)

图书馆(针织品)

代码语言:javascript
运行
复制
<style>
.kable_wrapper {
  border: hidden;
}
</style>

## Help with Kable

As you can see, there's an extra line above the aligned tables, which I would like to remove.

```{r kable_extra_line}
代码语言:javascript
运行
复制
df1 <- tibble(Dummy = c(90748, 91006, 90748, 91006), 
代码语言:javascript
运行
复制
                       A = c(0, 6, 1, 110), 
代码语言:javascript
运行
复制
                       B = c(8, 0, 339, 0), 
代码语言:javascript
运行
复制
                       C = c(6, 7, 909, 309), 
代码语言:javascript
运行
复制
                       D = c(0, 0, 0, 0))
代码语言:javascript
运行
复制
df2 <- tibble(Dummy = c(90748, 91006, 90748, 91006), 
代码语言:javascript
运行
复制
                       A = c(0, 901, 0, 50), 
代码语言:javascript
运行
复制
                       B = c(0, 1, 122, 0), 
代码语言:javascript
运行
复制
                       C = c(1847, 1, 754, 625), 
代码语言:javascript
运行
复制
                       D = c(1, 0, 0, 0))
代码语言:javascript
运行
复制
kables(list(
代码语言:javascript
运行
复制
  kable(df1) %>%
代码语言:javascript
运行
复制
    kable_styling(bootstrap_options = c("striped", "bordered"),
代码语言:javascript
运行
复制
                  full_width = F) %>%
代码语言:javascript
运行
复制
    row_spec(0, bold = T) %>%
代码语言:javascript
运行
复制
    pack_rows("Pack some rows here", 1, 2, 
代码语言:javascript
运行
复制
              label_row_css = "background-color: #666; color: #fff;") %>%
代码语言:javascript
运行
复制
    pack_rows("Pack some rows here", 3, 4, 
代码语言:javascript
运行
复制
              label_row_css = "background-color: #666; color: #fff;"),
代码语言:javascript
运行
复制
  kable(df2) %>% 
代码语言:javascript
运行
复制
    kable_styling(bootstrap_options = c("striped", "bordered"),
代码语言:javascript
运行
复制
                  full_width = F) %>%
代码语言:javascript
运行
复制
    row_spec(0, bold = T) %>%
代码语言:javascript
运行
复制
    pack_rows("Pack some rows here", 1, 2, 
代码语言:javascript
运行
复制
              label_row_css = "background-color: #666; color: #fff;") %>%
代码语言:javascript
运行
复制
    pack_rows("Pack some rows here", 3, 4, 
代码语言:javascript
运行
复制
              label_row_css = "background-color: #666; color: #fff;")
代码语言:javascript
运行
复制
)) %>% 
代码语言:javascript
运行
复制
  kable_styling() 
代码语言:javascript
运行
复制
票数 1
EN
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接:

https://stackoverflow.com/questions/71049830

复制
相关文章

相似问题

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