R-将测试（以ifelse形式）分配在两个数字之间以生成虚拟变量

Question

Current code:

data$light <- ifelse(data$cigs == 1:5, 1, 0)

With the code above, I'm trying to focus on getting ifelse to only assign a 1 to values 1 through 5 in cigs ( cigs being number of cigarettes smoked per day, ranging from 0 to 50 ).

Answer 1

Try %in%

data$light <- ifelse(data$cigs %in% c(1:5), 1, 0)

Or equivalently

data$light <- ifelse(data$cigs >=1& data$cigs <=5, 1, 0)