[英]Recode continuous variable_summary
嘗試這個
A4 <- within(A4, resize <- factor(Size > 1000, c("S", "L")))
cut
正是這樣做的。
A4$resize <- cut(A4$Size, breaks = c(-Inf, 1000, Inf), labels = c("S", "L"))
我們可以使用findInterval
A4$resize <- with(A4, c('S', 'L')[findInterval(Size, 1000)])
或者使用case_when
library(dplyr)
A4 %>%
mutate(resize = case_when(Size > 1000 ~ "S", TRUE ~ "L"))
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.