Grundstück, mehrere Linien in einem Diagramm

Versuchen mit ggplot zu zeichnen mehrere Linien in einer Grafik, aber nicht sicher, wie dies zu tun ist mit meinen Daten. Nicht sicher, ob ich ändern müssen, der datastructure oder nicht (transponiert?)

Daten sieht wie folgt aus:

Company   2011   2013
Company1  300    350
Company2  320    430
Company3  310    420

Probierte ich es auch umgesetzt:

Year   Company1  Company2  Company3
2011   300       320       310 
2013   350       430       420

Und für diese kann ich plot 1 die Werte mit;

ggplot(data=df, aes(x=Year, y=Company1)) + geom_line(colour="red") + geom_point(colour="red", size=4, shape=21, fill="white")

Aber ich weiß nicht, wie zu kombinieren, die Gesellschaften wie ich nicht über ein Objekt "Firma" nicht mehr zur Gruppe auf. Irgendwelche Vorschläge?

InformationsquelleAutor Chrisvdberge | 2013-06-17
  1. 50

    Bringen Sie Ihre Daten in langen (also geschmolzenes) - format, um es mit ggplot2:

    library("reshape2")
mdf <- melt(mdf, id.vars="Company", value.name="value", variable.name="Year")

    Dann müssen Sie aes( ... , group = Company ) zu gruppieren:

    ggplot(data=mdf, aes(x=Year, y=value, group = Company, colour = Company)) +
    geom_line() +
    geom_point( size=4, shape=21, fill="white")

    Grundstück, mehrere Linien in einem Diagramm

    • df nicht überschreiben stats::df, R weiß, auf welche Sie sich beziehen nach Kontext. Versuchen Sie es selbst: df <- data.frame(A=1:10) ; df(df$A, 1, 5)
    • Das ist es, was ich Las schon mehrfach, aber du hast Recht, es ist nicht überschrieben. So als Notiz für mich selbst: Niemals Informationen an Dritte weitergeben, ohne überprüft zu haben Sie von mir 🙂 ich bearbeitete meine Frage.
    • Es kann immer noch eine gute Idee, um zu vermeiden df als variable Namen - wenn Sie es oft (wie ich es Tue, gegen meine eigenen Ratschläge) dann manchmal, wenn Sie vergessen, es zu definieren, erhalten Sie die kryptische Fehlermeldung "Fehler in df$foo : object of type 'Verschluss' ist nicht subsettable", anstatt etwas besser wie "Fehler: Objekt 'df' nicht gefunden".
    InformationsquelleAutor Beasterfield
  2. 11

    Anstatt die unverschämt gewundenen benötigten Datenstrukturen durch ggplot2, können Sie mit der nativen R-Funktionen:

    tab<-read.delim(text="
Company 2011 2013
Company1 300 350
Company2 320 430
Company3 310 420
",as.is=TRUE,sep=" ",row.names=1)

tab<-t(tab)

plot(tab[,1],type="b",ylim=c(min(tab),max(tab)),col="red",lty=1,ylab="Value",lwd=2,xlab="Year",xaxt="n")
lines(tab[,2],type="b",col="black",lty=2,lwd=2)
lines(tab[,3],type="b",col="blue",lty=3,lwd=2)
grid()
legend("topleft",legend=colnames(tab),lty=c(1,2,3),col=c("red","black","blue"),bg="white",lwd=2)
axis(1,at=c(1:nrow(tab)),labels=rownames(tab))

    Grundstück, mehrere Linien in einem Diagramm

    • 'unverschämt sich verschachtelte Datenstrukturen" mehr als nur ein bisschen stark. Ich finde es sehr hilfreich, um die Daten in dieser Form
    InformationsquelleAutor Federico Giorgi
  3. 0

    Die Antwort von @Federico Giorgi war eine sehr gute Antwort. Es helpt mir.
    Deswegen habe ich die folgenden, in der Reihenfolge zu erzeugen mehrerer Linien im gleichen Diagramm aus den Daten eines einzelnen Datensatzes, ich verwendet eine for-Schleife. Die Legende kann ebenso Hinzugefügt werden. 

    plot(tab[,1],type="b",col="red",lty=1,lwd=2, ylim=c( min( tab, na.rm=T ),max( tab, na.rm=T ) )  )
for( i in 1:length( tab )) { [enter image description here][1]
lines(tab[,i],type="b",col=i,lty=1,lwd=2)
  } 
axis(1,at=c(1:nrow(tab)),labels=rownames(tab))
    InformationsquelleAutor Estatistics
Schreibe einen Kommentar