[問題] 如何將function放入迴圈? (求救)

看板R_Language作者ronald736 (明天會更好)時間5年前 (2018/10/06 11:11)推噓1(1推 0噓 1→)

留言2則, 2人參與討論串1/2 (看更多)

我想將資料每筆按照規則分群，資料如下圖: https://imgur.com/a/wXNRKJ6 圖中想把"平均成績"依照P50、P70這2個欄位分成3類平均成績 < P50 為第3類平均成績 >= P50 且 <P75 為第2類平均成績 >=P75 為第1類我打算將function放入迴圈 (因為是要每1筆都依照欄位分群) 程式碼如下，能否幫我看看是寫法上錯誤嗎? 還是那邊的觀念不對? classp <- NULL for (i in 1:dim(pdata)[1]) { cf <- function(pdata$平均成績[i]) { if (pdata$平均成績[i]<pdata$P50[i]) { classp[i] = 3 } else if (pdata$平均成績[i]>=pdata$P50[i] & pdata$平均成績 [i]<pdata$P75[i]) { classp[i] = 2 } else { classp[i] = 1 } return(classp[i]) } classp[i] <- cf(pdata$平均成績[i]) } classp 程式碼與錯誤圖: 程式碼 : https://imgur.com/a/Sw9Mrmb 錯誤 : https://imgur.com/a/3DeYkYJ -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 123.194.168.247 ※ 文章網址: https://www.ptt.cc/bbs/R_Language/M.1538795480.A.C1E.html

→

HumuHumu

10/06 12:28, 5年前 , 1^F

10/06 12:28, 1^F

推

celestialgod

10/06 15:29, 5年前 , 2^F

10/06 15:29, 2^F

‣ 返回看板[ R_Language ] 程式

‣ 更多 ronald736 的文章

文章代碼(AID): #1Rk2VOmU (R_Language)