r - IBrokersでオプションチェーンを引っ張る

Question

このように：opt <-reqContractDetails（tws、twsOption（local = ""、expiry = "20111021"、right = ""、symbol = "UCO"））

これは非常に遅いです。これはIBのせいですか？オプションチェーンを10分以内に返す方法に関する提案はありますか？

ありがとう

Answer 1

より良い ISP を取得しますか?

> tws <- twsConnect()
> system.time(opt<-reqContractDetails(tws,twsOption(local="", expiry="20111021",right="",symbol="UCO")))
   user  system elapsed 
   0.07    0.00    0.17 
> twsDisconnect(tws)