[問題]依照index放入文字於向量中

[empireisme (empireisme)]

x=seq(100)

我有一個x

我想要把所有x <10的元素 都放入 low

所有10 < x<50 的元素都放入 medium

所有 x>50的元素都放入 high

我自己的思路只到這邊 就是利用邏輯函數完成

x[which(x<10)]

x[which(10<=x&x<50)]

x[which(50<=x)]

如果只有兩個 很好使用 ifelse 完成

ifelse(x<10,"low"," medium " )

但是我現在有三個

有沒有甚麼可以向量化的操作完成這件事

我原本想做

x[which(x<10)] <- "low"

x[which(10<=x&x<50)] <- "medium"

x[which(50<=x)] <- "high"

但是發現不行

想到解法了 好像把x換成 data.frame就可以了

發現還是不行 還望提供結法

--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 219.91.75.186 (臺灣)
※ 文章網址: https://www.ptt.cc/bbs/R_Language/M.1585227470.A.6D7.html
※ 編輯: empireisme (219.91.75.186 臺灣), 03/26/2020 21:01:27
※ 編輯: empireisme (219.91.75.186 臺灣), 03/26/2020 21:08:20
※ 編輯: empireisme (219.91.75.186 臺灣), 03/26/2020 21:25:58
推 locka: 把轉成data frame後，df %>% mutate(level = ifelse(x < 10
→ locka: , "low", ifelse(x >=50, "high" , "medium")))
→ locka: 或是 cut(x, c(-Inf,10,50,Inf), c("low","medium","high")
→ locka: ,right=T) 這樣就不用轉data frame
推 khaos: 用apply行不行？
→ andrew43: cut()最直接，頂多再接個as.character() 若不愛factor
→ empireisme: 推
推 bboybighead2: case_when