小弟在学R绘图，有这么几行代码：
ncol <- 6
nrow <- 5
grid.rect(gp=gpar(col="grey"))
for (i in 1:nrow) {
  for (j in 1:ncol) {
    x <- unit(j/(ncol+1), "npc")
    y <- unit(i/(nrow + 1), "npc")
    pch <- (i - 1)*ncol + j - 1
    if (pch > 25)
      pch <- c("A", "b", ".", "#")[pch - 25]
    grid.points(x + unit(3, "mm"), y,
      pch=pch, gp=gpar(fill="grey"))
    grid.text(pch, x - unit(3, "mm"), y, gp=gpar(col="grey"))
  }
}
结果显示：
错误: 没有"grid.rect"这个函数
请问这是什么原因？