r - 提取数字后从两列中选择较高的值，R

Question

我有一个数据框(8 个变量的 451 个 obs)，它有两列(6&7)，如下所示:

  Major      Minor
  C:726      T:2
  A:687      G:41
  T:3        C:725

我想创建一列总结这一点。为此，我不关心每个单元格中的字母，但我希望保留更大的数字，无论它在哪一行。即我希望它看起来像这样:

  Summary_column
  726
  687
  725

没有必要，但对于那些想知道我在做什么的人来说，这是一个名为 VCFtools 的程序的输出；它有一个计数功能，可以对 VCF 中的等位基因进行计数，但有时当它显然更常见时，它会将等位基因命名为“次要”。

感谢您的帮助!

Answer 1

我会做这样的事情:

extract <- function(v) {
  gsub("^.*:", "", v)
}
within(d, Summary_column <- pmax(extract(Major), extract(Minor)))

这给出了:

  Major Minor Summary_column
1 C:726   T:2            726
2 A:687  G:41            687
3   T:3 C:725            725