Не используйте функцию order()
, вместо этого используйте функцию rank()
, которая, очевидно, была создана для этого:
outcome_4 <- outcome_3 %>%
group_by(State) %>%
mutate(ranks = rank(paste0(Heart_Attack,Hospital_Name), ties.method = "average")) # this ranks on a concatenation of the two variables instead of just the numeric variable alone. Since Heart_Attack is first it ranks based on that.
Вы можете использовать метод связей, который лучше всего подходит для вашей задачи, так чтодействительно выглядит как случай для "среднего".