在R中創建交互式圖

Question

我想知道在R（RStudio）中是否可能有一個交互式繪圖，用戶可以在其中單擊圖像並將其用作即將進行的處理的輸入。 這是我的情況：

我有一個繪圖的柵格

plot(NDVI[[4]])

[！[在此處輸入圖片描述] [1]] [1]

然后，添加第二個包含多邊形限制的圖層：

plot(fields, add=TRUE)

[！[在此處輸入圖片描述] [2]] [2]

我的目標是用戶單擊圖像以選擇其中一些多邊形（比方說3）。 這些單擊用於標識那些多邊形，這些多邊形隨后將用於在它們表示的區域內得出平均柵格值。

到目前為止，我一直在更新包含點的shapefile，但我想使其更具交互性

points<-readOGR("Points_crops.shp") 
fields<-readOGR("Boundaries.shp")
fields_sub <- fields[!is.na(sp::over(fields, sp::geometry(points))), ]
NDVI_mean<-lapply(NDVI, FUN=function (NDVI) {data.frame(mean=extract(NDVI,fields_sub,fun=mean))})

Answer 1

對於那些感興趣的人，我已經使用click功能解決了這個問題。 這將檢索您用鼠標單擊的點的坐標。 在此之后，你可以將它們轉換為spatialPoints設置proj4string （相同的參考光柵的一個）。

  points<-click(NDVI[[4]], n=5, xy=TRUE, show=TRUE)
  points$value<-NULL
  points<-SpatialPoints(points, proj4string = crs(S2_stack_crop[[2]]))

一旦將這些點作為spatialPoints點， spatialPoints可以繼續下一步