小编Ste*_*290的帖子

关于这个主题的类似问题都使用了 spread() 和 Gather() ，它们都是已退休的 Tidyverse 函数。假设我有一个这样的小标题：

people   1      2     3.    4     5
person1 27000 30000 40000 50000 60000
person2 27000 30000 40000 50000 60000
person3 27000 30000 40000 50000 60000
person4 27000 30000 40000 50000 60000

我想将其转置为这样

People Person1 Person2 Person3 Person4 Person5
1.      270000  270000  270000. 270000. 270000
2.      30000.  30000. 30000  30000. 30000
3
4
5.     60000.   60000.  60000 60000 60000

（没有填写第三和第四列只是为了节省自己的时间，但它们应该被填写。

我希望将 Bootstrap 导航栏（如下所示： https: //getbootstrap.com/docs/4.0/components/navbar/）添加到我正在创建的 R Markdown 模板中。

通过阅读，我了解了如何从另一个文件添加 HTML 元素并在 R Markdown 中调用它们。

但是，是否有办法在 Markdown 文件中包含 HTML 代码，这样导航栏仍然会被添加，但我只需要一个页面来显示结果？

我有两个文件。第一个文件看起来像这样（但有数千行长：

Chr10:2-20 0 0 0 0
Chr1:390-32032 1 2 0 0 
Chr3:32-3020 0 0 1029 20
Chr4:30239-40000 10 15 10 20
Chr10:2-20 9 9 1 8
Chr7:0-80 1 0 3 9
Chr8:0-30 8 6 3 3

第二个文件看起来像这样（但也有数千行长）

Chr1:390-32032
Chr4:30239-40000
Chr3:32-3020
....
Chr4:30239-40000

我想生成第三个文件，从第一个文件中提取数据，仅当 Chr 记录在第二个文件中时。所以第三个文件看起来像这样：

Chr1:390-32032 1 2 0 0 
Chr4:30239-40000 10 15 10 20
Chr3:32-3020 0 0 1029 20
Chr4:30239-40000 10 15 10 20

我对代码的想法是使用 AWK 和 fnr==nr 函数。可能将第一列放入数组中？我似乎无法让事情正常工作。任何帮助，将不胜感激。