如何识别每行(B1和A4的EX:20)的最大值,比同一行的下一个最大值(B1和A3的5)高2倍?样本输入namea1a2a3a4b111520b2109209b31111样本输出b1a420b2a320看答案和:library(dplyr)library(tidyr)d%>%gather(k,v,-name)%>%arrange(-v,name)%>%group_by(name)%>%mutate(logi=v/lead(v,default=min(v))>=2)%>%filter(v==first(v)&logi)%>%select(-logi)结果是:#Atibble:2x3#Groups