data1<-"e!f!g!"aaa<-function(){
  if data1 存在{
    b<-data1
    print(b)
    删除data1
  }
}
aaa()


如何判断data1是否存在，如果存在，则删除。
谢谢！