如何在R中的这个十六进制网格中创建相等的角度？

install.packages("grid")
library(grid)

# 创建绘图设备
pdf("grid_plot.pdf", width = 6, height = 6)

# 设置绘图区域大小
pushViewport(viewport(width = 0.8, height = 0.8))

# 定义网格的行数和列数
rows <- 4
cols <- 4

# 计算每个单元格的角度
angle <- 360 / (rows * cols)

# 循环创建网格
for (i in 1:rows) {
  for (j in 1:cols) {
    # 设置当前单元格的角度
    pushViewport(viewport(angle = (i - 1) * cols * angle + (j - 1) * angle))
    
    # 绘制当前单元格
    grid.rect()
    
    # 退出当前单元格的视口
    popViewport()
  }
}

# 完成绘图
popViewport()
dev.off()