r - 在 R 中绘制李克特量表

Question

我对 R 完全陌生并且自学 - 在 YouTube 视频的帮助下使用了 5 天。

我想绘制李克特调查响应，但努力解决或找到方法。

共有 8 个问题，561 个回答，5 分制。第九个问题让调查参与者回答是或否。

理想情况下，我想要显示响应分散的 goem_jitter 之类的东西，并且我可以根据对第 9 个问题的是/否响应为这些着色。

我读过的数据集显示了 9 个 obvs。562 个变量。

我可以使用此代码为一个参与者的响应重新创建一个情节。

opinionv3 %>%
  filter(question %in% c("q1", "q2", "q3", "q4", "q5", "q6", "q7", "q8")) %>%
  ggplot(aes(x = question, y = p1)) +
  geom_jitter() +

我会很感激任何建议。

Answer 1

在字里行间阅读，我认为您可能想要这样的东西（比 geom_jitter 更好地显示数据）：

ggplot(opinionv3, aes(p1)) +
  geom_bar(stat='count') +
  facet_wrap(~question)

或者，如果您想使用抖动显示点，也许将其与小提琴图结合起来以更好地显示分布：

ggplot(opinionv3, aes(question, p1)) +
  geom_violin() +
  geom_jitter(height = 0.1)

一些虚拟数据：

opinionv3 = data.frame(
  question = rep(paste0('q', 1:5), each=100),
  p1 = c(sample(1:5,100,T, prob=c(1,2,3,4,2)), 
         sample(1:5,100,T, prob=c(1,5,2,2,6)), 
         sample(1:5,100,T, prob=c(4,2,5,1,2)), 
         sample(1:5,100,T, prob=c(7,1,1,2,2)), 
         sample(1:5,100,T, prob=c(1,1,1,1,1)) 
  )
)