This line of code produces a column name that starts with an empty space (i.e. " turkey consumption") so you need to refer to it the same way in your call to ggbarplot().
This is not valid syntax
If you fix these two things you should get a plot like this as output
library(ggpubr)
# Sample data in a copy/paste friendly format for reproducibility
# (you don't need to do this, you can use your own dataframe directly)
turkeydata2 <- data.frame(
stringsAsFactors = FALSE,
check.names = FALSE,
id.num = c(1L,2L,3L,4L,5L,
6L,7L,8L,9L,10L,11L,12L,13L,14L,15L,16L,
17L,18L,19L,20L,21L,22L,23L,24L,25L,26L,27L,
28L,29L,30L,31L,32L,33L,34L,35L,36L,1L,2L,
3L,4L,5L,6L,7L,8L,9L,10L,11L,12L,13L,
14L,15L,16L,17L,18L,19L,20L,21L,22L,23L,24L,
25L,26L,27L,28L,29L,30L,31L,32L,33L,34L,
35L,36L,1L,2L,3L,4L,5L,6L,7L,8L,9L,10L,
11L,12L,13L,14L,15L,16L,17L,18L,19L,20L,21L,
22L,23L,24L,25L,26L,27L,28L,29L,30L,31L,
32L,33L,34L,35L,36L),
drowsy = c(4,5,1,5,2,5,1,
2,1,2,3,4,2,2,5,5,3,1,1,4,1,1,1,1,3,
2,3,1,6,1,5,1,3,2,1,3,3,4,2,6,3,5,
2,3,3,2,3,4,3,3,6,4,6,6,4,7,4,7,3,
7,6,6,1,2,1,1,6,5,7,1,7,5,6,2,6,7,4,
7,2,6,4,6,7,6,5,5,4,3,7,6,7,5,6,5,
6,7,7,6,6,7,5,7,7,6,7,5,7,6),
content = c(5,4,5,5,5,6,7,
5,3,5,3,3,3,4,3,3,4,7,7,6,6,5,4,1,4,
2,4,5,4,3,3,7,6,4,4,6,5,3,6,4,5,4,
6,5,4,6,5,2,5,4,4,4,6,7,7,7,7,7,5,
7,6,3,7,7,7,5,7,7,3,7,6,7,4,6,3,2,5,
5,7,4,7,7,5,2,5,6,5,7,5,7,7,7,7,6,
7,7,7,5,7,6,3,6,7,7,6,7,7,6),
`alcohol consumption` = c("noalc","noalc",
"noalc","noalc","noalc","noalc","noalc","noalc",
"noalc","noalc","noalc","noalc","noalc","noalc",
"noalc","noalc","noalc","noalc","noalc",
"noalc","noalc","noalc","noalc","noalc","noalc",
"noalc","noalc","noalc","noalc","noalc","noalc",
"noalc","noalc","noalc","noalc","noalc","alc",
"alc","alc","alc","alc","alc","alc","alc","alc",
"alc","alc","alc","alc","alc","alc","alc",
"alc","alc","alc","alc","alc","alc","alc",
"alc","alc","alc","alc","alc","alc","alc","alc",
"alc","alc","alc","alc","alc","alc","alc",
"alc","alc","alc","alc","alc","alc","alc","alc",
"alc","alc","alc","alc","alc","alc","alc",
"alc","alc","alc","alc","alc","alc","alc","alc",
"alc","alc","alc","alc","alc","alc","alc",
"alc","alc","alc","alc"),
` turkey consumption` = c("noturk","noturk",
"noturk","noturk","noturk","noturk","noturk",
"noturk","noturk","noturk","noturk","noturk",
"noturk","noturk","noturk","noturk","noturk",
"noturk","noturk","noturk","noturk","noturk","noturk",
"noturk","noturk","noturk","noturk","noturk",
"noturk","noturk","noturk","noturk","noturk",
"noturk","noturk","noturk","noturk","noturk",
"noturk","noturk","noturk","noturk","noturk",
"noturk","noturk","noturk","noturk","noturk","noturk",
"noturk","noturk","noturk","noturk","noturk",
"noturk","noturk","noturk","noturk","noturk",
"noturk","noturk","noturk","noturk","noturk",
"noturk","noturk","noturk","noturk","noturk",
"noturk","noturk","noturk","turk","turk","turk",
"turk","turk","turk","turk","turk","turk","turk",
"turk","turk","turk","turk","turk","turk",
"turk","turk","turk","turk","turk","turk","turk",
"turk","turk","turk","turk","turk","turk",
"turk","turk","turk","turk","turk","turk","turk")
)
# Relevant code
ggbarplot(turkeydata2, " turkey consumption", "drowsy",
color = "alcohol consumption", palette = c("#0072B2", "#E69F00"),
add = "mean_ci", position = position_dodge(0.9)) +
scale_y_continuous(expand = c(0,0)) +
coord_cartesian(ylim = c(0,7)) +
labs(y = "Likert Scale Ratings(1-7)")
Created on 2021-12-10 by the reprex package (v2.0.1)
Note: Next time please provide a proper REPRoducible EXample (reprex) illustrating your issue.