我對這個資料集有點印象,不知道是不是John Hopkins在coursera上面的課程
先說我的想法,我覺得這件事沒有變成function的必要性,不過這是作業
好像是要測試寫function的概念,我不確定這是不是你要的
Pollutant_mean <- function(data, column, selectedindex) {
return (mean(data[selectedindex, column]))
}
建議你可以google一下"Google R Style"
把程式碼寫的乾淨一點會比較容易看一點