Estou tentando usar a função getOptionChain () da biblioteca QuantMod para baixar cadeias de opções para VIX, SP500 e Eurostoxx 50, mas o seguinte não funciona:

library(quantmod)
VIX.OPT <- getOptionChain("^VIX")

Estou recebendo este erro:

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=^VIX+Options'

Como posso consertar isso?