Try this modification of your code.
-tgs
ynames -
base.dat.sel2$base.dat.Covariate[order(base.dat.sel2$base.dat.US.Num.Obs.to.Achieve.Starting.Residual,decreasing=F)]
ynames - as.character(ynames)
ynames[12]-expression(theta[r])
ynames[13]-expression(EC[gw])
ttt-barplot(base.dat.sel2$base.dat.US.Num.Obs.to.Achieve.Starting.Residual[order(base.dat.sel2$base.dat.US.Num.Obs.to.Achieve.Starting.Residual,decreasing=F)],
names.arg=ynames,
col=grey,horiz=T,las=1,xlim=c(0,450),yaxs=i,cex.axis=1.2,cex.names=1.1)
On Wed, Dec 8, 2010 at 2:15 PM, emorway emor...@engr.colostate.edu wrote:
Hello,
I've been looking through ?phantom and ?expression and this forum for
examples of how I might be able to manipulate some of the names that appear
on the y-axis of the barplot below. For example, the gw in ECgw would
appear as a subscript...or qr would be the theta symbol followed by
subscript r. My attempts haven't even come close to what I'm after. I
could switch to ?text or ?mtext, but thought for positioning purposes it
would be easier to do it with names.arg in the barplot function call.
Thanks,
Eric
base.dat.sel2-read.table(textConnection(base.dat.Covariate
base.dat.US.Number.Observations
base.dat.US.Num.Obs.to.Achieve.Starting.Residual
base.dat.US.Percent.Reduction.in.EM38.Surveys
base.dat.DS.Number.Observations
base.dat.DS.Num.Obs.to.Achieve.Starting.Residual
base.dat.DS.Percent.Reduction.in.EM38.Surveys
Baseline 391 391 NA 281 281 NA
WTD 391 315 0.194 281 210 0.253
ECgw 391 362 0.074 281 280 0.004
SM 391 349 0.107 281 280 0.004
WTD_ECgw 391 300 0.233 281 209 0.256
WTD_SM 391 286 0.269 281 210 0.253
ECgw_SM 391 318 0.187 281 280 0.004
WTD_ECgw_SM 391 269 0.312 281 210 0.253
Sand 391 359 0.082 281 279 0.007
Silt 391 369 0.056 281 280 0.001
Clay 391 370 0.054 281 269 0.043
WTD_ECgw_SM_Sand 391 263 0.327 281 181 0.356
qr 391 360 0.079 281 270 0.038
Ks 391 370 0.054 281 276 0.017
qr_Ks 391 358 0.084 281 271 0.035
WTD_ECgw_SM_qr 391 261 0.332 281 188 0.331
WTD_ECgw_SM_Ks 391 260 0.335 281 205 0.270),header=T)
closeAllConnections()
par(mar=c(3,15,2,1))
barplot(base.dat.sel2$base.dat.US.Num.Obs.to.Achieve.Starting.Residual[order(base.dat.sel2$base.dat.US.Num.Obs.to.Achieve.Starting.Residual,decreasing=F)],
names.arg=base.dat.sel2$base.dat.Covariate[order(base.dat.sel2$base.dat.US.Num.Obs.to.Achieve.Starting.Residual,decreasing=F)],
col=grey,horiz=T,las=1,xlim=c(0,450),yaxs=i,cex.axis=1.2,cex.names=1.1)
--
View this message in context:
http://r.789695.n4.nabble.com/Formatting-names-arg-in-barplot-tp3078861p3078861.html
Sent from the R help mailing list archive at Nabble.com.
__
R-help@r-project.org mailing list
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.
[[alternative HTML version deleted]]
__
R-help@r-project.org mailing list
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.
