最简单的解决方案如下:
方法:
采取独特的
Var2
按除法排列
row_number
具有
10
. 这将提供
Var2型
排名在
1-10
. 说这是
meth_rank
.
参加
meth\u等级
“女性”。冰毒。命令
to find out corresponding
MethRank`用于行。
meth_rank <- unique(female.meth.ordered$Var2) %>% as.data.frame() %>%
mutate(RankMeth = ceiling(row_number()/10))
colnames(meth_rank) <- c("Var2", "RankMeth")
#Join meth_rank with female.meth.ordered to populate rank.
female.meth.ordered %>%
select(-RankMeth) %>%
inner_join(meth_rank, by="Var2")
#Result will be generated with headings as
# Var1 Var2 value RankMeth