ggplot Fehler: Sie wissen nicht, wie automatisch Skala holen für Objekte vom Typ Funktion

Question

I geplottet Paket eines gestapeltes Balkendiagramm in R mit ggplot2,

data<-read.table("K.txt",header=TRUE, sep="\t") 
> data 
    Sample P1 P2 P3 P4 
1  G1 0.02 0.01 0.03 0.95 
2  G2 0.01 0.01 0.02 0.97 
3  G3 0.01 0.01 0.02 0.97 
4  G4 0.01 0.01 0.02 0.97 
5  G5 0.01 0.01 0.02 0.96 
6  G6 0.01 0.01 0.01 0.98 
7  G7 0.05 0.01 0.01 0.93 
8  G8 0.34 0.01 0.01 0.64 
9  G9 0.43 0.01 0.01 0.56 
> library("reshape2", lib.loc="C:/Program Files/R/R-2.15.2/library") 
> data1<-melt(data) 
Using Sample as id variables 
> head(data1) 
    Sample variable value 
1  G1  P1 0.02 
2  G2  P1 0.01 
3  G3  P1 0.01 
4  G4  P1 0.01 
5  G5  P1 0.01 
> library("ggplot2", lib.loc="C:/Program Files/R/R-2.15.2/library") 
ggplot(data=data1, aes(x=sample, y=value, fill=variable))+geom_bar(width=1)+scale_y_continuous(expand = c(0,0))+ opts(axis.text.x=theme_text(angle=90)) 
Don't know how to automatically pick scale for object of type function. Defaulting to continuous 
Error in data.frame(x = function (x, size, replace = FALSE, prob = NULL) : 
    arguments imply differing number of rows: 0, 36 

any1 kann mir helfen, diesen Fehler zu sortieren?

Vielen Dank Ramesh

Answer 1

ändern sample (eingebaute Funktion) zu Sample (Ihre Variable)

ggplot(data=data1, aes(x=Sample, y=value, fill=variable)) + 
    geom_bar(width=1) + 
    scale_y_continuous(expand = c(0,0)) + 
    opts(axis.text.x=theme_text(angle=90))