Welcome to the community.
Are you new to R as well as RStudio?
This should get you started with your plot.
Ron.
library(tidyverse)
set.seed(12345)
# Dummy dataset. nb, I've created the numbers to be represented in the bars,
# the y values, and therefore use stat = 'identity' in geom_bar. Depending on
# your data you may not want to do that.
DF <- tibble(xstr = rep(LETTERS[1:5],each=4),
yval = runif(20),
what = rep(letters[1:4],times=5))
ggplot(DF) +
geom_bar(aes(x = xstr,
y = yval,
fill = what), stat = 'identity') +
facet_wrap(~ what, nrow = 1) +
coord_flip() +
theme_bw() + theme(strip.text = element_blank(),
axis.title = element_blank(),
axis.ticks = element_blank(),
axis.text.x = element_blank(),
panel.grid = element_blank(),
panel.border = element_blank())

Created on 2019-03-25 by the reprex package (v0.2.1)