我应该如何通过管道打开数据集并应用拆分等？

Question

我已经编写了此管道来读取excel文件，然后再应用两个步骤，但是我始终遇到对象错误。

ovo<-
  read_excel("notes_bypart.xlsx") %>%
  split(ovo$`User ID`) %>%
  lapply(function(i){
    i["User ID"] <-NULL;i}
    )

但是我不断得到这个： split.default（x = seq_len（nrow（x）），f = f，drop = drop，...）中的错误： 找不到对象“ ovo2”

该如何输送呢？