How do I get my Likert chart to go from diverging to converging?

Question

Normally, I create my Likert charts using ggplot2, but I've created this chart here using the Likert package.

Is it possible to remove that center line so there are five separate bars instead of the middle section with two sides? I think in doing so, this chart would need to go from diverging (two directions) to converging (one direction). That is, from...

100 - 75 - 50 - 25 - 0 - 25 - 50 - 75 - 100

to...

0 - 25 - 50 - 75 - 100

But I'm unsure how to do that with the Likert package.

Here is my code:

library(reshape)
library(likert)

setwd("~/Desktop/")

df<-read.csv("Likert_Test.csv")

df[8:12] <- lapply(df[8:12], as.factor)

df[8:12] <- lapply(df[8:12], factor, levels = 1:5)
mychart <- likert(df[8:12], grouping = df$Country)

plot(mychart)

Answer 1

Have you tried using the likert package argument centered=FALSE?