有谁能解释为什么行名称会被截断？它与字符串换行的长度无关。指定row.just =“center”不会截断行名称。

x <- data.frame(row.names=paste("Very very name goes in here somewhere yep it is a looooonnngggg name! phew that was a long name",1:10))

# string wrap long names    
rownames(x) <- sapply(lapply(rownames(x), strwrap, width=40), paste, collapse="\n")

# data frame    
x[,1] <- 1:10
x[,2] <- sample(1:100,10)
x[,3] <- sample(LETTERS[1:26],10)
colnames(x) <- c("Value 1", "Value 2", "Label")

# create table
main_table <- tableGrob(x,cols = colnames(x), show.colnames = TRUE, row.just = "left")

# display table (is there another way to display?
grid.arrange(main_table)

给我这个（抱歉放大）

而指定“中心”则会得到以下结果

main_table <- tableGrob(x,cols = colnames(x), show.colnames = TRUE, row.just = "center")
grid.arrange(main_table)

有什么想法吗
另外，我不知道为什么图像是这样的，当我在绘图窗口中点击“缩放”时，它们是完整的表格，但保存/导出只保存放大的版本...