用if的話要寫迴圈
data$Level <- sapply(data$Followers, function(x){
if (x>50 & x<80){
"a"
}else if(){
"b"
}else{
"c"
}
})
但這作法很沒效率
直接幫樓主做完了
data$Gender[data$Gender=="F"] <- "女"
data$Gender[data$Gender=="M"] <- "男"
data$Level[data$Followers>50 & data$Followers<80] <- "熱門youtuber"
data$Level[data$Followers>=80 & data$Followers<100] <- "即將邁入百萬級"
data$Level[data$Followers>=100] <- "百萬級youtuber"
data$Year <- 2021 - as.integer(gsub("-.*$", "", data$join.Date))
開頭說效率的部份,是因為R的迴圈是出了名的慢,所以能用index、向量解決的事就盡量避免迴圈的用法