Wie die Grafik mit geom_ribbon

Ich habe drei Tabellen:

Upper  Bound  
    Q      C   
    1     30  
    2     50  
    3     40

Lower  Bound      
    Q      C       
    1     10   
    2     15     
    3     20

Schlechte Daten:

Q      C      Name  
1      50     Sample 1  
2      40     Sample 1  
3      30     Sample 1  
1      0      Sample 2  
2      60     Sample 2  
3      5      Sample 2

Möchte ich ein Diagramm mit Graphen für die unteren und oberen Grenzen in Grau und füllt alles, was in und zwischen den Graphen der schlechte Beispiele auf der Oberseite mit verschiedenen Farben und eine Legende:

plot <- ggplot(Bad_Data, aes(x = Bad_Data$Q, y = Bad_Data$C, group = 1))
plot + geom_line(aes(color = N)) + geom_ribbon(aes(ymin = Lower_Bound$C, ymax = Upper_Bound$C))

Ich versucht, aber es gab mir diese Fehlermeldung:

Fehler: Ästhetik muss entweder die Länge 1 oder die gleichen wie die Daten (624): ymin, ymax, x, y, Gruppe

Wer kann mir helfen?

Sie brauchen nicht die Bad_Data$ Teil innerhalb der aes.
Legen Sie alle Ihre Daten in einem data-frame mit den Spalten Q, C -, Namens -, Ober-und Niederösterreich. Verwenden Sie nicht data$column innen aes() verwenden Sie einfach den nicht börsennotierten Spaltennamen.

InformationsquelleAutor Arya | 2016-07-19

  1. 1

    Hier ist ein Anfang, Sie können zwicken die Farben und andere Parameter, um die Dynamik genau so, wie Sie möchten. Ich habe noch ein paar ästhetik mit der Beschreibung dessen, was jeder tut:

    #Prepare
Bad_Data$Lower_Bound <- Lower_Bound$C
Bad_Data$Upper_Bound <- Upper_Bound$C

#Plot
library(ggplot2)
p <- ggplot(Bad_Data, aes(x = Q, y = C, color=Name, group=Name))
p <- p + geom_line()
p + geom_ribbon(aes(ymin=Lower_Bound, ymax=Upper_Bound), 
                alpha=0.1,       #transparency
                linetype=1,      #solid, dashed or other line types
                colour="grey70", #border line color
                size=1,          #border line size
                fill="green")    #fill color

    Wie die Grafik mit geom_ribbon
    Daten

    Hier die Daten:

    Upper_Bound <- read.table(text="Q      C   
1     30  
                          2     50  
                          3     40", header=T)

Lower_Bound <- read.table(text="Q      C       
                          1     10   
                          2     15     
                          3     20", header=T) 

Bad_Data <- read.table(text="Q      C      Name  
                       1      50     Sample1  
                       2      40     Sample1  
                       3      30     Sample1  
                       1      0      Sample2  
                       2      60     Sample2  
                       3      5      Sample2", header=T)

    Bearbeiten

    Sicherer Zubereitung:

    Bad_Data$Lower_Bound <- Lower_Bound$C[match(Bad_Data$Q, Lower_Bound$Q)]
Bad_Data$Upper_Bound <- Upper_Bound$C[match(Bad_Data$Q, Upper_Bound$Q)]
    gibt mir diese Fehlermeldung Fehler: Ästhetik muss entweder die Länge 1 oder die gleichen wie die Daten (624): ymin, ymax, x, y, Farbe, Gruppe
    Ich geposteten Daten auf der Unterseite. Hast du das Beispiel? Oder haben Sie Ihre echten Daten?
    Ich habe die Daten, die ich verwendet, und die Ausgabe, zu zeigen, dass es tatsächlich funktioniert. Wenn dies nicht funktioniert, auf die tatsächlichen Daten, zumindest wissen Sie, dass es möglich ist und wie es funktioniert.
    ja ich habe meine Daten, und es hatte verschiedene Namen, so dass ich geschraubt bis es funktionierte Dank so viel ur sind die besten, die besten XD
    Sie sind herzlich willkommen

    InformationsquelleAutor Pierre Lafortune

Schreibe einen Kommentar