[Coursera]R Programming #2 加分贴

求学分啊

各种熬夜补作业

想问下 part1 里面 pollutantmean编好了 也没有显示错误 为什么总是显示：
> result <- pollutantmean("specdata", "sulfate", 1:10)
错误于file(file, "rt") : 无法打开链结
此外: 警告信息：
In file(file, "rt") :
  无法打开文件'specdata/001.csv': No such file or directory
>
我第一部分的代码：
pollutantmean <- function(directory,pollutant,id=1:332 ){
data <- read.csv(directory)
data_subset <- subset(data,data$ID<=max(id)&data$ID>=min(id))
if (pollutant=="sulfate"){
result <- mean(data_subset$sulfate,na.rm=T)}
if (pollutant=="nitrate"){
result <- mean(data_subset$nitrateate,na.rm=T)}
return (result)
}
麻烦各位大神指教！！

新人报道,programming作业中的corr.R怎么改都提交不了，明明运行结果跟参考答案一样的说！可不可以一起交流一下呢？

还有四个小时DUE，惆怅

低估了难度，晚了一天，好伤心
感觉课程video和作业严重脱节，美帝学习都是这个节奏么。

求学分
确实第二周比第一周难很多

上传附件有限制啊...放相册里传又要审核...潜水党就是伤不起