如何从猫鼬的对象数组中删除一个对象？

Question

我有这些数据，我想根据电影的 id/title 删除给定的电影

library(tidyverse)
tibble(int_ID = c(">= 0, <100",
              ">= 100, <200",
              ">= 200, <1,000",
              ">= 1,000, <2,000",
              ">= 2,000, <3,000",
              ">= 3,000, <5,000",
              ">= 5,000, <50,000")) %>% 
  separate(int_ID, into=c("begin","end"), ", ",remove = FALSE) %>% 
  mutate(begin = str_sub(begin,4)) %>% 
  mutate(end = str_sub(end,2)) %>% 
  mutate_at(vars(begin,end),~as.integer(str_remove(.,","))) -> intervals

VehicleDriverCarrierPremium_factor <- c()
for(i in 1:length(VehicleDriverCarrierPremium) ){ # for each element
  print(VehicleDriverCarrierPremium[i])
  if(!is.na(VehicleDriverCarrierPremium[i])){
    for (j in 1:length(intervals$int_ID)){ # we test on which interval he goes
      if(VehicleDriverCarrierPremium[i]>= intervals$begin[j] & VehicleDriverCarrierPremium[i] < intervals$end[j]){
        VehicleDriverCarrierPremium_factor <- c(VehicleDriverCarrierPremium_factor, intervals$int_ID[j])
      }
    }
    }else{
      VehicleDriverCarrierPremium_factor <- c(VehicleDriverCarrierPremium_factor, "(Null)")

  }
  print(VehicleDriverCarrierPremium_factor)
}

VehicleDriverCarrierPremium<-c(423,12,NA,535,231,875,9000)

在文档中它说我可以使用 $pull 来实现这一点，但我很难弄清楚它是如何完成的。我的控制器方法

    "_id": "604184234a2f37156cec63ca",
    "name": "Jacob Tremblay",
    "description": "Jacob Tremblay is a Canadian actor. He made his film debut as Blue in the live action animated film",
    "born": "06051993",
    "bornCountry": "Usa",
    "movies": [
        {
            "movie": {
                "_id": "604184384a2f37156cec63cb",
                "title": "Luca",
                "__v": 0,
                "id": "604184384a2f37156cec63cb"
            },
            "role": "Luca"
        }
    ],
    "__v": 0
}