我正在处理一些具有经度和纬度的分组排名数据,我希望每次排名增加1时就向纬度字段添加0.00075。
以下是5000个群组之一,未知最大机架数,因此我需要在group_by中使用理想的dplyr。
我知道我可以使用
group_by(loc_id) %>% mutate(y = if_else(rank > 1, as.character(Y + 0.00075), as.character(Y))
但这只能起作用一次。
这是一些R代码来构建一个充满数据的数据框
id <- c(1,2,3,4,5)
loc_id <- c(77,77,77,77,77)
x <- c(-74.001981, -74.001981, -74.001981, -74.001981, -74.001981)
y <- c(40.736038, 40.736038, 40.736038, 40.736038, 40.736038)
views <- c(55,45,66,22,99)
rank <- c(3,4,2,5,1)
data <- data.frame(id, loc_id, x, y, views, rank)
将我的评论变成帖子。使用dplyr
,您可以执行以下操作:
data %>%
group_by(loc_id) %>%
mutate(y = y + ((rank - 1) * 0.00075))
本文收集自互联网,转载请注明来源。
如有侵权,请联系 [email protected] 删除。
我来说两句