特定の株の取引データを取得する SQL クエリがあります。特定の分析を適用するために、さまざまな株式をループしようとしています。以下のコードは、ループ内のクエリに変数を渡す試みと、「ハードコードされた」クエリを示しています。
どんなガイダンスも大歓迎です。
my.stocks <- c('ABL','IPL')
for (i in 1:2)
{
channel <- odbcConnect("Public_Trades")
my.frame1 <- sqlQuery(channel,
"SELECT TRADE_DATE_TIME,
PRICE,
QUANTITY
FROM [ISLDWODS].[HERMES_PUBLIC].[PUBLIC_TRADES_HISTORY]
where TRADE_DATE_TIME > '2012-11-01' and TRADE_TYPE ='AT' and INSTR_CODE = " & my.stocks[i] &
"order by TRADE_DATE_TIME asc")
my.frame2 <- sqlQuery(channel,
"SELECT TRADE_DATE_TIME,
PRICE,
QUANTITY
FROM [ISLDWODS].[HERMES_PUBLIC].[PUBLIC_TRADES_HISTORY]
where TRADE_DATE_TIME > '2012-11-01' and TRADE_TYPE in ('AT','UT') and INSTR_CODE = 'MPC'
order by TRADE_DATE_TIME asc")
close(channel)
}