Добавяне на текстови етикети към растерна графика - r, растер

Скриптът:

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 функция в растерно пространство се отнася само за текстови обекти с формат растер. Поздравителни за съвет относно това, как да добавите отделни точки към растерната графика.

Отговори:

Можете да използвате графиката :: текст като нормално, но очаквате x, y като първите аргументи, точно като points и много други xy.coords функции:

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