Извлечь многоугольник и центр как столбец в SF

Question

У меня есть фрейм данных в стиле sf со следующей структурой:

Classes ‘sf’ and 'data.frame':  1672 obs. of  3 variables:
 '$ grid.100:sfc_POLYGON of length 1672; first list element: List of 1
 ' ..$ : num [1:5, 1:2] 542829 543129 543129 542829 542829 ...
  ..- attr(*, "class")= chr  "XY" "POLYGON" "sfg"
' $ id      : int  1 2 3 4 5 6 7 8 9 10 ...
' $ count   : int  0 0 0 0 0 0 0 0 1 0 ...
 - attr(*, "sf_column")= chr "grid.100"
 - attr(*, "agr")= Factor w/ 3 levels "constant","aggregate",..: NA NA
  ..- attr(*, "names")= chr  "id" "count"

Я хочу извлечь отдельные координаты из функции POLYGON, поэтому каждая сторона многоугольника является собственным столбцом.в кадре данных.

Есть мысли?

Answer 1

Я понял это, я думаю:

grid.sff <- grid.sf %>%
  dplyr::mutate(latt = sf::st_coordinates(grid.sf$center)[,1]) %>%
  dplyr::mutate(lonn = sf::st_coordinates(grid.sf$center)[,2])