删除与R中的列表不匹配的列

Question

我想删除所有与列表不匹配的列，或者只保留列表中或此列表中的列。

我有一个数据框A

  a b c d e f g h 
1
2
3 
4
5
6

我有一个列表L：

"a", "c", "d", "e", "h"

我想要拥有的东西：

  a c d e h 
1
2
3 
4
5
6

感谢您的帮助。