Удалить определенные полигоны из шейп-файла по идентификатору многоугольника (не то же самое, что и идентификатор строки)

Question

У меня есть шейп-файл с 4000 полигонов.

Каждый из этих полигонов имеет идентификатор в своем слоте shape@polygons.

Эти идентификаторы не совпадают с идентификатором строки. Например, многоугольник в строке 4 имеет идентификатор 15213.

Я хотел бы удалить некоторые полигоны на основе их идентификаторов полигонов в шейп-файле.

Возможно?

Я пытался использовать следующее:

   newdata<-subset( shape@polygons, id != 15213)

Я получаю эту ошибку:

     Error in id != 11243 : 
     comparison (2) is possible only for atomic and list types