编织PDF时如何更改kableExtra::spec_pointrange的线条颜色

How to change line color of kableExtra::spec_pointrange when knitting PDF

kableExtra 创建一个带有一些图的 table,如 its manual 所示。 我们将有以下 table 和带有 kableExtra::spec_pointrange() 的点范围图,运行 此 post.

底部的代码

但是我如何改变绘图的 lines 的颜色(注意,不是中心点的颜色),当编织PDF。 如果我们也可以在 PDF 中自由指定错误栏和垂直点线的颜色,那应该很棒,因为在编织 HTML 时似乎可以以某种方式交互更改线条颜色,如 a blog post 中所建议].

coef_table <- data.frame(
  Variables = c("var 1", "var 2", "var 3"),
  Coefficients = c(1.6, 0.2, -2.0),
  Conf.Lower = c(1.3, -0.4, -2.5),
  Conf.Higher = c(1.9, 0.6, -1.4)
)
data.frame(
  Variable = coef_table$Variables,
  Visualization = ""
) %>%
  kbl(booktabs = T) %>%
  kable_classic(full_width = FALSE) %>%
  column_spec(
    2, 
    image = spec_pointrange(
      x = coef_table$Coefficients,
      xmin = coef_table$Conf.Lower,
      xmax = coef_table$Conf.Higher,
      vline = 0
    )
)

包的作者Hao Zhu added line_col to spec_pointrange。所以现在kableExtra支持线条颜色配置。