R语言中,怎么提取函数计算的某些结果

Python012

R语言中,怎么提取函数计算的某些结果,第1张

如果这个函数本身返回的东西是一个list,那我们可以用$符号来提取,举例如下:

sum_and_mean = function(a,b){

sum = a+b

mean = (a+b)/2

return(list(sum = sum, mean = mean))

}

# 当我们call这个function的时候

sum_and_mean(2,4)$sum # 结果等于6

sum_and_mean(2,4)$mean # 结果等于3希望对你有帮助!

#创建文件夹

#根目录

filepath = "C:\\Users\\Administrator\\Desktop" #定义路径

if(length(list.dirs(path = filepath)[ #判断路径下是否有文件

grep(date, list.dirs(path = filepath))]) == 1){ #如果有的话

shell(paste("rm -rf ",filepath, "\\", date, sep = "")) # 删除该文件

dir.create(paste(filepath, "\\", date, sep = ""))#在创建该文件

}else{

dir.create(paste(filepath, "\\", date, sep = "")) #否则直接创建

}

上面是我原来写的一个,判断是否存在一个文件夹,有的话删除再重新创建,你可以用时间每次新创建一个文件夹或者文件,就可以了。你在改下应该可以用。简单的就直接这样就可以了:write.csv(data, file = paste("path", sys.date, ".csv",sep = ""),这样创建的数据就是每次按照时间来的,我这个是按天来的,有个时间可以精确到秒的,你可以查一下