2012-10-17 5 views
1

주식 기호가 .csv 파일 인 프로그램을 작성하고 공적분과 같은 항목에 대해 서로 테스트하십시오. 그러나 다음 코드를 실행하면 quatnmod가 여러 심볼 요청에 auto.assign = TRUE를 사용해야하는 것에 대해 나에게 뭔가를 제공합니다. 나는이 작업을 수행 할 때 그 오류가 발생한다getSymbols에서 오류가 발생했습니다. 여러 기호 요청에 auto.assign = TRUE를 사용해야합니다.

Error in getSymbols(sym, from = Sys.Date() - (365 * 7), auto.assign = FALSE) : 
    must use auto.assign=TRUE for multiple Symbols requests 
Calls: addprices -> getprices -> getSymbols 

내가 알고, 나는이 오류가 참조 무엇이라고 생각 : 나는 addprices (symbols1, symbols2)를 실행하면

getprices<-function(sym){ 
    #get prices from last 7 years 
    prices<-getSymbols(sym, from = Sys.Date() - (365*7), auto.assign=FALSE) 
    #exract closing prices 
    prices<-Cl(prices) 

    return(prices)} 


symbols1 <- c('TSN', 'MSFT') 
symbols2 <- c('AAPL', 'NFLX') 

container<-c() 
addprices <- function(symbols1, symbols2){ 
    for (i in symbols1){ 
    for (g in symbols2){ 
     i<-getprices(i) 
     g<-getprices(g) 
     container <- i+g 
     } 
    } 
    return(container) 
    } 

나는이 오류 ~ :

getSymbols(sym, from = Sys.Date() - (365 * 7), auto.assign = FALSE) 

그러나 내가하는 것은 그렇게하지 않습니다. 그래서 무엇을 제공합니까? 어떤 충고? 해결 방법이 있습니까?

나는 이것을 봤 거든 거기에 어떤 관련 질문/대답도 정말로 없었다.

답변

2

문제는 반복기를 g for 루프 안에 덮어 쓰는 것입니다. g의 첫 번째 반복은 잘 작동하지만 두 번째 반복에서는 i이 더 이상 symbols1[1]이 아니며 ... getprices(i)의 결과입니다.

+0

그 트릭을했습니다. 감사! – user1613119

+0

@ user1613119 : 귀하의 질문에 대한 답변이있는 경우 [FAQ] ([FAQ 질문] (http://stackoverflow.com/faq#howtoask)의 [여기에 어떻게 질문합니까?] (http://stackoverflow.com/faq#howtoask) 섹션에서 요청한대로 http://stackoverflow.com/faq)). –