Programmatically look up a ticker symbol in R

Question

I have a field of data containing company names, such as

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

  Company
1 Microsoft
2