мутируйте, создайте категории
data6 <- data6 %>%
mutate(age3cat = cut(agea, breaks=c(0,39,65,Inf), labels=c("young", "middle-aged", "old")))
Diana H
data6 <- data6 %>%
mutate(age3cat = cut(agea, breaks=c(0,39,65,Inf), labels=c("young", "middle-aged", "old")))