2017-03-15 11 views
0

Ich möchte die Namen der Firmen nach zwei Spalten erhalten Region und Name des Rollenspielers. Ich finde json Links auf jeder Seite bereits, aber mit RJSonio hat es nicht funktioniert. Es geht darum, Daten zu sammeln, aber wie könnte ich es zu einer lesbaren Ansicht bringen? Könnte jemand helfen, danke. HierWebscraping mit R JSON

ist die link

Ich versuche, diesen Code aus einem anderen ähnlichen Frage auf Stackoverflow

library(RJSONIO) 

library(RCurl) 

greifen die Daten

raw_data <- getURL("http://www.milksa.co.za/admin/settings/mis_rest/webservicereceive/GET/index/page:1/regionID:7.json") 
#Then covert from JSON into a list in R 
data <- fromJSON(raw_data) 

length(data) 

final_data <- do.call(rbind, data) 

head (final_data) 
+1

Sie müssen Code anzeigen, den Sie versuchen zu arbeiten, damit wir Ihnen helfen können, ihn wieder in die Spur zu bringen. – sconfluentus

+0

@bethanyP hat es geschafft! – 700er

Antwort

0

Meine persönliche Präferenz dafür ist die Bibliothek zu benutzen jsonlite und nicht verwenden fromJSON überhaupt

require(jsonlite) 
data<-jsonlite::fromJSON(raw_data, simplifyDataFrame = TRUE) 
finalData<-data.frame(cbind(data$rolePlayers$RolePlayer$orgName, data$rolePlayers$Region$RegionNameEng)) 
colnames(finalData)<-c("Name", "Region") 

dem Sie die folgenden Datenrahmen gibt:

        Name  Region 
       GoodHope Cheese (Pty) Ltd Western Cape 
         Jay Chem (Pty) Ltd Western Cape 
       Coltrade International cc Western Cape 
GC Rieber Compact South Africa (Pty) Ltd Western Cape 
        Latana Cheese Pty Ltd Western Cape 
         Marco Frischknecht Western Cape 

Eine gute Möglichkeit, sich vorzustellen, wie die Abfrage und was in Ihrem JSON-String ist, kann hier gefunden werden: Chris Photo JSON viewer

Sie können einfach schneiden und fügen Sie es dort aus der raw_data (Entfernen von externen Anführungszeichen). Von dort aus wird es leicht zu sehen, wie Sie Ihre Daten mit Adressierung wie mit einem traditionellen Datenrahmen und dem $ Operator strukturieren.

+0

PS ... Entschuldigung, es hat so lange gedauert, die Arbeit hat begonnen! – sconfluentus

+0

Das ist großartig! Danke Bethany! – 700er