R 如何缩短ifelse语句的代码长度

R 如何缩短ifelse语句的代码长度,r,if-statement,R,If Statement,我想根据总天数计算总页数。 示例:0到25天第1页, 26至50天第2页等…! 我使用下面的方法 df$totalpage <- ifelse(df$days >=0 & df$days<=25,1, ifelse(df$days >=26 & df$days<=50,2,"Something wrong")) df$totalpage=0&df$days=26&df$days 365)我必须添加许多if

我想根据总天数计算总页数。 示例:0到25天第1页, 26至50天第2页等…! 我使用下面的方法

df$totalpage <- ifelse(df$days >=0 & df$days<=25,1,
                      ifelse(df$days >=26 & df$days<=50,2,"Something wrong"))

df$totalpage=0&df$days=26&df$days 365)我必须添加许多ifelse,这使得代码很长。任何建议都会有帮助。

我们可以使用
findInterval

findInterval(df$days, seq(0,365,25))
cut

cut(df$days, seq(0,365,25), labels = FALSE)

您可以使用以下代码,它只需要
天花()
和division
/

df$totalpage <- ceiling(df$days/25))

df$totalpage请参见
?cut
?findInterval
,但我只有一行数据(数据框的名称为
df
)。表示天数的单个值。。!
findInterval(df$days,seq(0365,25))
工作正常吗?是的,工作正常。非常感谢。。!