如何修改gt嵌套表格的文本颜色与字号？添加属性无效求解决

gt包无法直接在gt()函数内通过color、size参数设置文本样式，必须使用其专属的样式调整函数实现。以下是适配你代码的具体解决方案：

方案1：全局统一设置文本样式 #

使用opt_table_style()配合cell_text()，一次性调整表格所有文本的颜色与字号：

library(gt)
library(tidyverse)

nested_data <- diamonds %>% head(10)%>% group_by(color) %>% 
  summarise(x=list(x),y=list(y))

nested_data %>% 
  gt() %>%
  opt_table_style(
    style = cell_text(
      color = "darkblue",  # 自定义文本颜色
      size = px(12)        # 自定义字号，px为像素单位
    )
  )

方案2：针对特定列设置样式 #

如果仅需修改嵌套列（x、y列）的样式，用tab_style()指定目标列即可：

nested_data %>% 
  gt() %>%
  # 修改嵌套列文本样式
  tab_style(
    style = cell_text(
      color = "red",
      size = px(14)
    ),
    locations = cells_body(columns = c(x, y))
  ) %>%
  # 额外设置表头样式（可选）
  tab_style(
    style = cell_text(
      color = "green",
      size = px(16),
      weight = "bold"
    ),
    locations = cells_column_labels(columns = everything())
  )

核心说明 #

gt的样式系统遵循单元格定位+样式规则的逻辑，所有样式调整都需通过tab_style()、opt_table_style()这类专用函数完成，直接在gt()中传递color/size参数不会生效。cell_text()还支持weight（字体粗细）、align（对齐方式）等更多样式参数，可按需扩展。

内容的提问来源于stack exchange，提问作者anderwyang