将不同的文本添加到R中的多个网格

library(grid)

# 创建一个新的绘图窗口
grid.newpage()

# 创建一个2x2的网格布局
layout <- grid.layout(nrow = 2, ncol = 2)

# 在第一个网格中添加文本
grid.text("Text 1", x = 0.5, y = 0.5, just = "center", gp = gpar(fontsize = 20))

# 在第二个网格中添加文本
grid.text("Text 2", x = 0.5, y = 0.5, just = "center", gp = gpar(fontsize = 20))

# 在第三个网格中添加文本
grid.text("Text 3", x = 0.5, y = 0.5, just = "center", gp = gpar(fontsize = 20))

# 在第四个网格中添加文本
grid.text("Text 4", x = 0.5, y = 0.5, just = "center", gp = gpar(fontsize = 20))

# 将网格布局应用于绘图窗口
grid.show.layout(layout)