Что-то не так с пакетом sjPlot?

Я пытаюсь запустить этот код с помощью пакета sjPlot...

library(sjPlot)
likert_6 <- data.frame(as.factor(sample(1:6, 500, replace=T, prob=c(0.2,0.1,0.1,0.3,0.2,0.1))),
                       as.factor(sample(1:6, 500, replace=T, prob=c(0.15,0.15,0.3,0.1,0.1,0.2))),
                       as.factor(sample(1:6, 500, replace=T, prob=c(0.2,0.25,0.05,0.2,0.2,0.2))),
                       as.factor(sample(1:6, 500, replace=T, prob=c(0.2,0.1,0.1,0.4,0.1,0.1))),
                       as.factor(sample(1:6, 500, replace=T, prob=c(0.1,0.4,0.1,0.3,0.05,0.15))))
levels_6 <- list(c("Very strongly disagree", "Strongly disagree", "Disagree", "Agree", "Strongly Agree", "Very strongly agree"))
items <- list(c("Q1", "Q2", "Q3", "Q4", "Q5"))
sjp.likert(likert_6, legendLabels=levels_6, barColor="red", axisLabels.x=items, orderBy="pos")

Пакет был правильно установлен, но я получаю следующую ошибку:

Error in sjp.likert(likert_6, legendLabels = levels_6, barColor = "red",  : 
  could not find function "sjp.likert"

У кого-нибудь еще возникает эта проблема при запуске этого кода/пакета? Я никогда не использовал его раньше и проверил веб-сайт для получения конкретных инструкций.