I resolved it not elegantly with: d=as.numeric(as.character(e$pheno)) ed<-ggplot(e) + geom_bar(aes(x = ESRD, fill = factor(pheno,labels=c("control","case"))))+scale_fill_manual(values=c("#56B4E9","#E7B800"))+labs(fill="pheno")+scale_x_continuous(breaks = unique(d))
ed where: > head(e) ESRD pheno 1 1 1 2 1 1 3 1 2 4 1 1 5 1 1 > sapply(e,class) ESRD pheno "integer" "factor" On Fri, May 22, 2020 at 1:52 PM Ana Marija <sokovic.anamar...@gmail.com> wrote: > > Hello, > > I made the plot in attach via: > > ed<-ggplot(e) + > geom_bar(aes(x = ESRD, fill = > factor(pheno,labels=c("control","case"))))+scale_fill_manual(values=c("#56B4E9","#E7B800"))+labs(fill="pheno") > > ed > > How do I show only 1 and 2 on x axis? > > Thanks > Ana ______________________________________________ R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.