ggplot mit Strings auf x-Achse

Question

Ich versuche, ein Diagramm mit mehreren Kurven zu zeichnen. Die X-Achse sind keine numerischen Werte, sondern Strings.

Dies funktioniert (wie in how to plot all the columns of a data frame in R):

require(ggplot2) 
df_ok <- rbind(data.frame(x=4:1,y=rnorm(4),d="d1"),data.frame(x=3:1,y=rnorm(3),d="d2")) 
ggplot(df_ok, aes(x,y)) + geom_line(aes(colour=d)) 

Aber meine Daten sieht wie folgt aus:

require(ggplot2) 
df_nok <- rbind(data.frame(x=c("four","three","two","one"),y=rnorm(4),d="d1"),data.frame(x=c("three","two","one"),y=rnorm(3),d="d2")) 
ggplot(df_nok, aes(x,y)) + geom_line(aes(colour=d)) 

Ich erhalte den Fehler geom_path: Jede Gruppe besteht aus nur einer Beobachtung. Müssen Sie die Gruppenästhetik anpassen?. Obwohl die Diagrammlinien nicht angezeigt werden, sind die Achsen geplottet, und die X-Achse enthält die korrekten Etiketten - aber auch falsche Reihenfolge.

Eine Idee, wie Sie dies so einfach wie möglich planen? (Beachten Sie auch die fehlenden x-Werte für einige Serien).

Answer 1

Ihr Problem sehen ist, dass die x Variable ist ein Faktor. Also, Ihre Datenrahmen ändern und x einen doppelten:

df = rbind(data.frame(x=4:1,y=rnorm(4),d="d1"), 
      data.frame(x=3:1,y=rnorm(3),d="d2")) 

Plot als normal

g = ggplot(df, aes(x,y)) + geom_line(aes(colour=d)) 

aber ändern, um die x-Achse Skalierung explizit:

g + scale_x_continuous(breaks=1:4, labels=c("one", "two", "three", "four")) 

---

umbenennen Ihre Variable, versuchen Sie etwas wie:

x1 = factor(df_nok$x, 
      levels=c("one", "two", "three", "four"), 
      labels=1:4) 
df$x1 = as.numeric(x1) 

Answer 2

Sie ggplot überzeugen können Linien zeichnen durch eine Dummy-Gruppe hinzufügen,

ggplot(df_nok, aes(x,y)) + geom_line(aes(colour=d, group=d)) 

Auch http://kohske.wordpress.com/2010/12/27/faq-geom_line-doesnt-draw-lines/

Answer 3

Fügen Sie in der group Ästhetik (Art von redundant, ich weiß, aber viel einfacher als Re-Jigging der Achsenbeschriftungen).

df_nok <- rbind(data.frame(x=c("four","three","two","one"),y=rnorm(4),d="d1"),data.frame(x=c("three","two","one"),y=rnorm(3),d="d2")) 

ggplot(df_nok, aes(x,y, group=d)) + geom_line(aes(colour=d)) 

Es stimmt, dass Ihre X-Achse immer noch nicht in der von Ihnen gewünschten Reihenfolge ist. Wie von @csgillespie bemerkt, können Sie dies beheben, indem Sie es in einen Faktor verwandeln.

df_nok$x <- factor(df_nok$x, 
      levels=c("one", "two", "three", "four"), 
      labels=1:4)