從 RMarkdown 中的 kableExtra 表增加標題大小

Question

我正在使用posterdown中的海報 package 來生成 HTML 海報並將其呈現為 ZBCD1BZFF686176B59AD1

我的 Rmd 文件中有一個表格，但是標題非常小。 有沒有辦法增加標題的大小？

其次，我還想將 header 中的標題和隸屬關系稍微向下移動（使其更位於 header 的中心。有沒有辦法做到這一點？

這是我的 Rmd 文件的片段

---
title: Here is my title 
author:
  - name: Name and Surname
affiliation:
    address: Department, University
column_numbers: 3
logoright_name: https://raw.githubusercontent.com/brentthorne/posterdown/master/images/betterhexlogo.png
logoleft_name: https://raw.githubusercontent.com/brentthorne/posterdown/master/images/betterhexlogo.png
output: 
  posterdown::posterdown_html:
    self_contained: false
knit: pagedown::chrome_print
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = FALSE)
```

# Intro

```{r table1, echo = FALSE, warning = FALSE, message = FALSE, results = 'asis', fig.pos='!h'}
library(tidyverse)
library(kableExtra)

col_1 <- c(1,2,3)
col_2 <- c(4,5,6)
col_3 <- c(7,8,9)

data.frame(col_1, col_2, col_3) %>% 
  kable(format='html',booktabs=TRUE, caption = "This is the caption", escape=F) %>% 
  kable_styling(font_size = 45)

```

`````

Answer 1

對於標題，您有多種選擇。 最簡單的方法當然是在文檔頂部的 YAML 的標題前插入一個<br> 。 這將在您的標題之前插入一個換行符。

或者，您可以插入 CSS 塊來更改h1標簽的樣式：

```{css, echo=FALSE}
h1 {
    padding-top: 40px
}
```

原則上，您應該能夠包含這種 CSS 塊來更改任何 HTML 元素的樣式。 但是， kableExtra似乎對字體大小進行了硬編碼並忽略了 CSS，因此該解決方案僅適用於某些樣式元素。 一個 hacky 解決方案是使用gsub或其他類似機制手動替換原始 HTML 中的字體大小：

```{css, echo=FALSE}
.table caption {
    color: red;
    font-weight: bold;
}
```

```{r table1, echo = FALSE, warning = FALSE, message = FALSE, results = 'asis', fig.pos='!h'}
library(kableExtra)

col_1 <- c(1,2,3)
col_2 <- c(4,5,6)
col_3 <- c(7,8,9)

data.frame(col_1, col_2, col_3) %>% 
    kbl(format = 'html',
        escape = FALSE,
        caption = "This is the caption") %>% 
    kable_styling(font_size = 45) %>%
    gsub("font-size: initial !important;", 
         "font-size: 45pt !important;", 
         .)
```