Hi,
first get the densities without plotting the histogram:
foo <- hist(x, plot=FALSE)
then plot the histogram and feed the rounded densities, converted to
character, to the labels argument (instead of just labels=TRUE):
hist(x, freq=F, xlab='',ylab="Percent of Total",
col="skyblue",
labels=as.character(round(foo$density,2)), right=FALSE,main="Position of
Hypothetical Protein")
HTH,
Stephan
Changbin Du schrieb:> x<- sample(1:14, 319, rep=T)
> hist(x, freq=F, xlab='',ylab="Percent of Total",
col="skyblue",
> labels=TRUE, right=FALSE,main="Position of Hypothetical Protein")
>
> Is there is way to round the labels to 2 decimal digits, for example, 0.088
> is changed to 0.09.
>
> Thanks!
>