[R] Problem getting Option Quotes

[Robert Sherry]

I am using R and quantmod to get stock and option quotes. However, it 
has stopped working. I expect the following
function call to produce a list of options:
         getOptionChain( "XOM", Exp = "2015-01-20" )
However, I get the following error messages:
     Error in lapply(strsplit(opt, "<tr>"), function(.) gsub(",", "", 
gsub("N/A",  :
       subscript out of bounds
     In addition: Warning message:
     In readLines(paste(paste("http://finance.yahoo.com/q/op?s=", 
Symbols,  :
       incomplete final line found on 
'http://finance.yahoo.com/q/op?s=XOM&m=2015-01-20+Options'

Has something changed? Am I doing something wrong?

Thanks
Bob