web-dev-qa-db-ja.com

テーブル-ケーブルのボーダーのボーダー色を変更

[〜＃〜] r [〜＃〜]で特定の列の周囲に境界線を作成しようとしています。 kableExtraパッケージを使用してこれを行うことができます（以下を参照）

_iris <- datasets::iris

iris2 <- do.call(data.frame, aggregate(. ~ Species, iris, function(x) c(mean = mean(x), sd = sd(x))))

res2 <- kable(iris2,"html", col.names =  c("Species", "Mean", "SD", "Mean", "SD", "Mean", "SD", "Mean", "SD"),   align = c("r","c","c","c","c","c","c","c","c")) %>%
  kable_styling(bootstrap_options = c("striped", "hover")) %>%
  add_header_above(c(" " = 1, "Sepal Length" = 2, "Sepal Width" = 2, "Petal Length" = 2, "Petal Width" = 2))

print(res2)

res3<- column_spec(res2, c(2,4,6,8), border_left = TRUE, border_right = FALSE)

column_spec(res3, c(3,5,7,9), border_left = FALSE, border_right = TRUE)
_

これにより、適切な位置に配置したい境界線が作成されますが、黒ではなく灰色にする必要があります。 column_spec関数の 'color ='を使用してみましたが、境界だけでなく、列全体が灰色になっています。

_res3<- column_spec(res2, c(2,4,6,8), border_left = TRUE, border_right = FALSE, color = "#D8D7D7")
column_spec(res3, c(3,5,7,9), border_left = FALSE, border_right = TRUE, color = "#D8D7D7")
_

境界線の色を変更する方法についての提案は役に立ちます！今のところ、関数を少しだけ変更できるかどうかを確認するためにgetAnywhere()を使用しています。

rknitrkableextra
13
daszlosek

境界線にcssを使用します。これは機能します

column_spec(res3, c(3,5,7,9), border_left = "2px solid gray",
            border_right = "2px solid gray")
9
Winicius Sabino