如果nrow = 1，则跳过ddply

Question

我有一个ddply遍历IP列表并在每个IP上应用乐趣。我希望只有在nrow(ip.data) > 1时才能返回值。否则，我希望ddply跳过该IP并继续。我怎么能这样做？

例如：

pd.outs <- ddply(server_ips, .(ip), function(x) get.ip.outs(x$ip, data))

nrow(ip.data)将提供（数据）子集中行数的长度。

Answer 1

一种方法是返回NULL nrow(x)==1：

pd.outs <- ddply(server_ips, .(ip), function(x) {
  if (nrow(x) == 1) {
    return(NULL)
  }
  get.ip.outs(x$ip, data)
})