这个呢,用简单的
ifelse
检查条件并将列添加到df本身。
df$new_June <- ifelse(df$June>=100, 100, df$June)
df$new_May <- ifelse(df$May>=100, 100, df$May)
df$new_July <- ifelse(df$July>=100, 100, df$July)
在df值之前:
> df
June May July
1 100 250 20
2 50 100 300
3 200 20 20
运行命令df value之后:
df$new_June <- ifelse(df$June>=100, 100, df$June)
df$new_May <- ifelse(df$May>=100, 100, df$May)
df$new_July <- ifelse(df$July>=100, 100, df$July)
df
June May July new_June new_May new_July
1 100 250 20 100 100 20
2 50 100 300 50 100 100
3 200 20 20 100 20 20
>