разделить имена столбцов с таблицей сетки

Question

Я хочу генерировать отформатированные таблицы с grid.table.вот что я сделал:

library(grid)
d <- head(iris, 3)
colnames(d) <- c("A very long colname", "Sepal Width",  "Petal Length", "Petal Width",  "Species")
grid.table(d, rows=NULL,theme=ttheme_minimal(
  colhead=list(fg_params=list(col="white",fontface=4L),
               bg_params=list(fill="#1bb600"))
))

, который является желаемым результатом (столбец имени разделен на две строки):

Как мне этого добиться?

Answer 1

Вы должны переименовать строки, указав деталь, в которой вы хотите разделить имена, с помощью \n между частями:

library(grid)
d <- head(iris, 3)
colnames(d) <- c("A very\nlong colname", "Sepal\nWidth",  "Petal\nLength", "Petal\nWidth",  "Species")
grid.table(d, rows=NULL,theme=ttheme_minimal(
  colhead=list(fg_params=list(col="white",fontface=4L),
               bg_params=list(fill="#1bb600")), 
  core
))