以编程方式在R中查找股票代码

我有一个包含公司名称的数据字段,例如

company <- c("Microsoft", "Apple", "Cloudera", "Ford")
> company

  Company
1 Microsoft
2 Apple
3 Cloudera
4 Ford

等等.

该软件包tm.plugin.webmining允许您从Yahoo!查询数据 基于股票代码的财务:

require(tm.plugin.webmining)
results <- WebCorpus(YahooFinanceSource("MSFT")) 

我错过了中间步骤.如何根据公司名称以编程方式查询票证符号？