stockSymbols quantmod Fehler mit Bindestrichen mit Google

Question

das R-Paket, Quantmod scheint Probleme beim Zugriff auf Unternehmen von Google bei der Verwendung der stockSymbols() -Funktion.

Hier ist eine Liste der Unternehmen, die ich bin, nachdem sie von der New Yorker Börse, es ist nur die ersten 30:

NYSE 
    [1] "A"   "AA"   "AAC"  "AAN"  "AAP"  "AAT"  "AAV"  "AB"   "ABB"  
    [10] "ABBV"  "ABC"  "ABEV"  "ABG"  "ABM"  "ABR"  "ABR-PA"  "ABR-PB"  "ABR-PC" 

Alles funktioniert gut, bis es ABR-PA wird und dann eine Fehlermeldung zurück.

Eine der Möglichkeiten, wie ich das umgehen konnte, war, einen Gsub darüber laufen zu lassen, um etwas von der Sprache zu ersetzen, und das half ein bisschen, aber ich vermisse immer noch ~ 1% der Firmen aus meiner ~ 3500 Liste .

hier ist der gsub:

NYSE <- gsub("-PK","-K",gsub("-PJ","-J",gsub("-PI","-I",gsub("-PH","-H",gsub("-PG","-G",gsub("-PF","-F",gsub("-PE","-E",gsub("-PD","-D",gsub("-PC","-C",gsub("-PB","-B",gsub("-PA","-A",NYSE))))))))))) 

Wenn jemand dies in Angriff genommen hat, bevor ich daran interessiert wäre, einige Gedanken zu hören.

Answer 1

Sie können versuchen, die folgenden zwei mögliche Lösungen:

getSymbols("ABR-PA", auto.assign=FALSE) 

und/oder

getSymbols(`ABR-PA`) 

Download-Daten für mehrere Bestände:

NYSE = c("A", "AA", "AAC", "AAN", "AAP", "AAT", "AAV", "AB", "ABB", 
     "ABBV", "ABC", "ABEV", "ABG", "ABM", "ABR", "ABR-PA", "ABR-PB", 
     "ABR-PC") 

data = lapply(NYSE, function(x) { 
    getSymbols(x, from="2007-01-01", auto.assign=FALSE) 
}) 

df = do.call(merge, data) 
df