На основании вашего комментария вы можете использовать ggplot2
для создания барплота. Вот так:
library(ggplot2)
ggplot(data = df, aes(x = product, y = cost)) +
geom_bar(stat = "identity") + coord_flip()
![enter image description here](https://i.stack.imgur.com/Dnr14.png)
data
df <- structure(list(id = c(1, 2, 3, 4, 5), product = structure(c(3L, 2L, 1L, 5L, 4L), .Label = c("coffee", "egg", "Milk", "sugar", "tea"), class = "factor"), cost = c(3, 2, 4, 2, 3)), class = "data.frame", row.names = c(NA, -5L))