如何在其他文本中搜索特定文本并检索信息

Question

这是我第一次在这里发帖，感谢您的帮助。 我有两个不同的大文本文件： 首先#a.txt有一列如：

rs151511
rs4156465
rs15651
chr1:1545455

第二个b.txt有三列，行数很多：

rs151511    45615614  1
rs4156465   51156155  2
rs15651     15615615  3
rs151655    45615614  1
rs156161    51156155  2
rs122242    15615615  3

我需要编写一个生成新文件的代码＆＃34; c.txt＆＃34;其文件＃1列表与文件＃2中的信息相同，格式如下：

rs151511       45615614  1
rs4156465      51156155  2
rs15651        15615615  3
chr1:1545455   1545455   1

感谢您的帮助。

Answer 1

如果它们都是R中的数据帧或矩阵，则以下内容应该有效。

final <- b[which(b[, 1] %in% a[, 1]), ]
write.table(final, "c:/c.txt", sep="\t")

如果你有一个矢量，你应该能够用矢量a切换a [，1]。有一个readlines函数可以读取您可能想要查看的困难的txt文件。