r - Adding subscripts in a pasted expression in ggplot2 axis labels -


very briefly, in

xlab(expression(paste("nitrate (",mu, g, "*", g^-1,")", sep=""))) 

i need replace "nitrate" nmic string "mic" subscripted:

expression(n[mic]) 

how can combine both expressions?

thank you!

here plot fiddle with:

    data <- as.data.frame(matrix(rnorm(60),20,3))      data$factor <- c(rep("f1", 4),rep("f2", 4), rep("f3", 4), rep("f4",4),rep("f5", 4))     names(data) <- c("a", "b", "c", "factor")     melted <- melt(data)      p <- ggplot(melted, aes(variable, value)) +          geom_point(aes(col=factor)) + xlab(expression(paste("nitrate (",mu, g, "*", g^-1,")", sep=""))) 


Comments