[R] Label bars in a faceted bar plot in ggplot2

[Harsh]

Hi List,
I am running R 2.8.0 on a Windows XP machine, running ggplot2 version 0.8.1

I want to label the bars in a faceted grid barplot. Reproducible R
code is given below:


#### reproducible facet barplot #####

library(ggplot2)

# Dataset from which to create the barplot
ml <- rep(1:10,2)
vals <- rnorm(20,mean = 10, sd=1)
type <- c(rep("MAPE",10),rep("AIC",10))
df<- data.frame(Models = as.factor(ml),Values=vals,Type=type)

# create lables to put on the bars
mapevals <- rnorm(10,1,1) * 10
aicvals<- rnorm(10,1,1) * 1000

## create plot
p<- NULL
p<- qplot(x=Models,y=Values,data=df,geom="bar")

# facet grid
print(p + facet_grid(.~Type))
################### END R CODE #########################

The above R code brings to the point where I see two grids based on
MAPE and AIC.

I want to put mapevals and aicvals on the bars of the two grids that
are created for MAPE and AIC respectively.

Thank you for your time and patience.

Regards

Harsh Singhal
Decision Systems,
Mu Sigma Inc.
Chicago, IL