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
Dear Harsh,
Have a look at geom_text()
ggplot(df, aes(x = Models, y = Values)) + geom_bar() + geom_text(aes(y Values +
1, label = round(Values, 2))) + facet_grid(.~Type)
HTH,
Thierry
------------------------------------------------------------------------
----
ir. Thierry Onkelinx
Instituut voor natuur- en bosonderzoek / Research Institute for Nature
and Forest
Cel biometrie, methodologie en kwaliteitszorg / Section biometrics,
methodology and quality assurance
Gaverstraat 4
9500 Geraardsbergen
Belgium
tel. + 32 54/436 185
Thierry.Onkelinx at inbo.be
www.inbo.be
To call in the statistician after the experiment is done may be no more
than asking him to perform a post-mortem examination: he may be able to
say what the experiment died of.
~ Sir Ronald Aylmer Fisher
The plural of anecdote is not data.
~ Roger Brinner
The combination of some data and an aching desire for an answer does not
ensure that a reasonable answer can be extracted from a given body of
data.
~ John Tukey
-----Oorspronkelijk bericht-----
Van: r-help-bounces at r-project.org [mailto:r-help-bounces at r-project.org]
Namens Harsh
Verzonden: woensdag 11 februari 2009 13:49
Aan: r-help at r-project.org
Onderwerp: [R] Label bars in a faceted bar plot in ggplot2
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
______________________________________________
R-help at 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.
Dit bericht en eventuele bijlagen geven enkel de visie van de schrijver weer
en binden het INBO onder geen enkel beding, zolang dit bericht niet bevestigd is
door een geldig ondertekend document. The views expressed in this message
and any annex are purely those of the writer and may not be regarded as stating
an official position of INBO, as long as the message is not confirmed by a duly
signed document.
Worked like a charm. Thanks a ton Thierry. Harsh Singhal Decision Systems Mu Sigma Inc. Chicago, IL On Wed, Feb 11, 2009 at 6:33 PM, ONKELINX, Thierry <Thierry.ONKELINX at inbo.be> wrote:> Dear Harsh, > > Have a look at geom_text() > > ggplot(df, aes(x = Models, y = Values)) + geom_bar() + geom_text(aes(y > Values + 1, label = round(Values, 2))) + facet_grid(.~Type) > > HTH, > > Thierry > > > ------------------------------------------------------------------------ > ---- > ir. Thierry Onkelinx > Instituut voor natuur- en bosonderzoek / Research Institute for Nature > and Forest > Cel biometrie, methodologie en kwaliteitszorg / Section biometrics, > methodology and quality assurance > Gaverstraat 4 > 9500 Geraardsbergen > Belgium > tel. + 32 54/436 185 > Thierry.Onkelinx at inbo.be > www.inbo.be > > To call in the statistician after the experiment is done may be no more > than asking him to perform a post-mortem examination: he may be able to > say what the experiment died of. > ~ Sir Ronald Aylmer Fisher > > The plural of anecdote is not data. > ~ Roger Brinner > > The combination of some data and an aching desire for an answer does not > ensure that a reasonable answer can be extracted from a given body of > data. > ~ John Tukey > > -----Oorspronkelijk bericht----- > Van: r-help-bounces at r-project.org [mailto:r-help-bounces at r-project.org] > Namens Harsh > Verzonden: woensdag 11 februari 2009 13:49 > Aan: r-help at r-project.org > Onderwerp: [R] Label bars in a faceted bar plot in ggplot2 > > 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 > > ______________________________________________ > R-help at 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. > > Dit bericht en eventuele bijlagen geven enkel de visie van de schrijver weer > en binden het INBO onder geen enkel beding, zolang dit bericht niet bevestigd is > door een geldig ondertekend document. The views expressed in this message > and any annex are purely those of the writer and may not be regarded as stating > an official position of INBO, as long as the message is not confirmed by a duly > signed document. >