R直方图X轴不均匀分布

Question

I woould like to display a histogram with the allocation of school notes.

The dataframe looks like:

> print(xls)
# A tibble: 103 x 2
    X__1 X__2 
   <dbl> <chr>
 1     3 w    
 2     1 m    
 3     2 m    
 4     1 m    
 5     1 w    
 6     0 m    
 7     3 m    
 8     1 w    
 9     0 m    
10     5 m  

I create the histogram with:

hist(xls$X__1, main='Notenverteilung', xlab='Note (0 = keine Beurteilung)', ylab='Anzahl')

It looks like: Why are there spaces between 1,2,3 but not between 0 & 1?

Thanks, BR Bernd

Answer 1

Use ggplot2 for that, and your bars will be aligned

library(ggplot2)
ggplot(xls, aes(x = X__1)) + geom_histogram(binwidth = 1)

Answer 2

You can try

barplot(table(xls$X__1))

or try

h <- hist(xls$X__1, xaxt = "n", breaks = seq(min(xls$X__1), max(xls$X__1)))
axis(side=1, at=h$mids, labels=seq(min(xls$X__1), max(xls$X__1))[-1])

and using ggplot

ggplot(xls, aes(X__1)) + 
   geom_histogram(binwidth = 1, color=2) +
   scale_x_continuous(breaks = seq(min(xls$X__1), max(xls$X__1)))