Hello all,
I have this simple barplot code:

ifn <- "id.dat"
dat <- read.table(ifn)
ofn <- "id.png"

bitmap(ofn, type = "png256", width = 30, height = 30, pointsize = 30, bg =
"white",res=50)
par(mar=c(5, 5, 3, 2),lwd=5)
par(cex.main=1.6,cex.lab=1.6,cex.axis=1.6)

names(dat)<-c("NumberOfPeople","Average")
Graph<-barplot(dat$Average)
dev.off()

and here is the data (id.dat):

15    0.08
 6    0.09
 7    0.37

I want to write down the ""NumberOfPeople" on top of each of the bars. Can
anybody help me on this?

Thanks,
Mohsen

	[[alternative HTML version deleted]]


