Continuing from yesterday's post, hopefully got the right order:
H <- c(6.36, 3.03, 6.85, 4.07, 4.69, 6.27, 6.67, 3.11, 5.07, 6.14, 5.93, 6.49)
par(mar = c(3, 9, 2, 2))
y <- barplot(height = H,
names.arg = c("Russian Banana", "Vermillion", "Atlantic", "POR12PG28-3", "Valery", "Rio Colorado", "CO99076-6R", "Purple Majesty", "AC99330-1P/Y", "CO05068-1RU", "Masquerade", "Canela Russet"),
horiz = TRUE,
col = colorRampPalette(colors = c("#6E5773","pink"))(n = length(x = H)),
border = NA,
xlab = "",
ylab = "",
xlim = c(0, 9),
axes = FALSE,
las = 1)
axis(side = 1,
at = 1:9,
labels = c("Dislike\nExtremely", "", "3", "", "5", "", "7", "", "Like\nExtremely"),
font.axis = 1,
cex.axis = 0.5)
abline(v = 7,
col = "magenta",
lty = 5)
text(x = H,
y = y,
labels = c("ab", "e", "a", "d", "cd", "ab", "ab", "e", "c", "ab", "b", "ab"),
pos = 2)

Hope this helps.
Edit (in response to post #5)
If you print y, you'll get the coordinates of the midpoints. Usually these are x-coordinates, but since you are using horizontal bar plot, it'll have y-coordinates.
I didn't follow your second question. I supplied a sequence of texts that I want to display on the plot, along with their desired x and y coordinates. It'll work in a vectorised manner.
Regarding facets, the obvious answer is use ggplot2, if you want that feature. And at least on this community, you'll get more help on that, as you've already been recommended in this and your last thread. If you don't want that, you can use mfrow for base graphics. Or, lattice is another option, though I can't help much on that.
If you cannot make mfrow work, I'll suggest that you create a new thread with a reproducible example, and maybe with an example of your desired result.
Hope this helps.