-1

TWS API を使用していますが、うまくいきません。やりたいことに近づいたのですが、lapply 関数を正しく使用する方法を理解しようとして立ち往生しています。

これが私が現在仕事をしなければならないことです：

library("IBrokers")
tws <- twsConnect()
tickers <- c("AAPL","YHOO")
reqMktData(tws, lapply(tickers, twsSTK), tickGenerics="", snapshot=T)
twsDisconnect(tws)

上記のtwsSTKに仕様を作りたいと思います。ラップリーを使わずに、シングル

library("IBrokers")
tws <- twsConnect()
reqMktData(tws, twsSTK("AAPL", exch = "ISLAND", currency = "USD"), tickGenerics="", snapshot=T)
twsDisconnect(tws)

ただし、この場合、lapply を適切に使用しようとすると問題が発生します。

ここでラップリーに対処する方法を知っている人はいますか?

4

1 に答える 1

0

lapply のドキュメントを読み間違えました。私の解決策については添付を参照してください。 

library("IBrokers")
tws <- twsConnect()
tickers <- c("AAPL","YHOO","MSFT","GLD")
reqMktData(tws, lapply(tickers, twsSTK, exch = "ISLAND", currency = "USD"), tickGenerics="", snapshot=T)
twsDisconnect(tws)
于 2014-12-16T02:35:36.843 に答える