Hi Dagmar,
Maybe your want something like this?
datframe<-data.frame(Name=c("Kati","Kati","Kati","Leon","Leon","Leon" ),
week =c("1","2", "3", "1","2", "3"),
numberdata =c("5","12", "1", "6","2", "5"))
datframe
datframe$numberdata<-as.numeric(as.character(datframe$numberdat))
library(plotrix)
barcol<-color.scale(datframe$numberdat,extremes=c("blue","red"))
barpos<-barplot(matrix(datframe$numberdat,nrow=2,byrow=TRUE),
beside=TRUE,names.arg=paste("Week",1:3),ylim=c(0,13),
col=matrix(barcol,nrow=2,byrow=TRUE))
barlabels(barpos,matrix(datframe$numberdat,nrow=2,byrow=TRUE))
barlabels(barpos,matrix(datframe$numberdat+0.4,nrow=2,byrow=TRUE),
labels=rep(c("Kati","Leon"),3),prop=1)
I don't see any other way to put the names on the y-axis that makes any sense.
Jim
On Fri, Jul 15, 2016 at 5:14 PM, Dagmar <ramga...@gmx.net> wrote:
> Dear all, dear Jim,
>
> Thank you for trying to help Jim. Unfortunately it didn't solve my problem.
>
> I want the names of the weeks on the x axis and the animals on the y-axis.
>
> Then, the shading of the barplot is supposed to represent the number of data
> per week.
>
> Any help?
>
> Dagmar
>
>
> Am 13.07.2016 um 13:58 schrieb Jim Lemon:
>>
>> datframe$numberdata<-as.numeric(as.character(datframe$numberdat))
>> library(plotrix)
>> barcol<-color.scale(datframe$numberdat,extremes=c("black","white"))
>> barplot(matrix(datframe$numberdat,nrow=2,byrow=TRUE),
>> beside=TRUE, horiz=TRUE,names.arg=paste("Week",1:3),
>> col=matrix(barcol,nrow=2,byrow=TRUE))
>
>
______________________________________________
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.
