ds %>%
ggplot(aes(wind_dir_9am)) +
geom_bar(width=0.5) +
scale_y_continuous(labels=comma) +
labs(x=vnames["wind_dir_9am"], y="Count")
The width of the bars can be specified, relative to the space allowed
for each bar. Here we make the bars narrower using
width=0.5 so as to be half width. This may help to
make the plot look less dark.
|