將文本標簽添加到柵格圖

Question

劇本：

library(raster)
places = data.frame(x=c(0.2, 0.7), y=c(0.2, 0.7), name=c('A','B'), stringsAsFactors=F)
plot(raster(volcano))
points(places$x, places$y, pch=16)
text(places$name, places$x, places$y-0.1)

在消息的最后一行失敗： In xy.coords(x, y, recycle = TRUE) : NAs introduced by coercion 。 我認為這是由於混合了圖形庫，但柵格中的text功能似乎只適用於柵格格式的文本對象。 感謝有關如何在柵格圖上添加離散點的建議。

Answer 1

您可以正常使用graphics :: text，但它希望x，y作為第一個參數，就像points和許多其他xy.coords函數一樣：

text(x = places$x, y = places$y-0.1, labels = places$name)