返回 R 中 sf 对象的完整大小写

Question

对于sf对象来说，df <- df[complete.cases(df), ]的等价物是多少？

我知道sf对象的行为大多类似于带有"粘性"geometry列的数据帧，但运行上面的代码会返回以下错误：

df <- df[complete.cases(df), ]
Error in complete.cases(df) : invalid 'type' (list) of argument

这可能是由于sf对象将其geometry变量存储为列表。感谢您的投入！

Answer 1

您可以使用sf::st_is_empty()来检查空几何图形

library(sf)
pt1 <- sf::st_sfc(sf::st_point())
pt2 <- sf::st_sfc(sf::st_point(c(0,0)))
sf <- sf::st_sf(geometry = c(pt1, pt2))
sf[!sf::st_is_empty(sf), ]
# imple feature collection with 1 feature and 0 fields
# geometry type:  POINT
# dimension:      XY
# bbox:           xmin: 0 ymin: 0 xmax: 0 ymax: 0
# epsg (SRID):    NA
# proj4string:    NA
# geometry
# 1 POINT (0 0)

Answer 2

我没有缺少几何形状的数据集来测试它，但可能是这样的：

lapply(sfd$geometry, function(x) any(is.na(x)))

将检查几何图形中是否有任何 NA 元素。您可以使用生成的向量为数据框编制索引并删除缺失的条目。