根据R中的条件根据最大值填充列

作者: 绵绵
发布时间: 2024-12-28 08:58:54 (1月前)
转自：

2 条回复

0#
回复此人
Mystery☀ | 2019-08-31 10-32

<div class =“post-text”itemprop =“text”> <P> 我们可以使用基数R. <code> ave </code> 匹配每组中的最大值 </p> <pre> <code> df$C <- +(with(df, B == ave(B, A, FUN = max))) df # A B C #1 1 1 0 #2 1 9 1 #3 2 5 0 #4 2 10 0 #5 2 15 1 #6 3 1 0 #7 3 2 1 #8 4 5 0 #9 4 6 1 </code> </pre> <P> 同样的 <code> dplyr </code> 将会 </p> <pre> <code> library(dplyr) df %>% group_by(A) %>% mutate(C = +(B == max(B))) </code> </pre> <HR /> <P> 我们也可以将它与最大值的索引相匹配 </p> <pre> <code> df$C <- with(df, ave(B, A, FUN = function(x) seq_along(x) == which.max(x))) </code> </pre> <P> 和 </p> <pre> <code> df %>% group_by(A) %>% mutate(C = +(row_number() == which.max(B))) </code> </pre> </DIV>

编辑

登录后才能参与评论