函数中如何判断是否存在

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

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


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

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：Data 如何

exists("data1")

qoiqpwqr 发表于 2014-5-12 21:42
exists("data1")

data1<-"e!f!g!"
aaa<-function(){
  if (exists("data1")==T) {
    b<-data1
    print(b)
    rm(data1)
  }
}
aaa()
data1
但aaa()出现
Warning message:
In rm(data1) : object 'data1' not found
如何解决？谢谢！

是想判断有没有data1这个变量么？
用ls或者objects返回当前工作空间的变量，是个字符串的向量
然后判断“data1”是不是这个向量的元素

因为在函数里面的rm只能删除当前frame里面的变量，也就是函数里定义的变量。如果要删除外部变量，用

rm(data1, pos = ".GlobalEnv")

qoiqpwqr 发表于 2014-5-12 21:54
因为在函数里面的rm只能删除当前frame里面的变量，也就是函数里定义的变量。如果要删除外部变量，用

rm( ...

如何列出局部变量和全局变量？谢谢！

a <- 1
x <- "abc"
listVar <- function() {
    b <- "local b"
    print(ls())
    print(ls(pos = ".GlobalEnv"))
}

说的很好