在 R 中绘制李克特量表

问题描述

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

我想绘制 Likert 调查回复,但正在努力解决或找到方法

共有 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() +

我很感激任何建议。

解决方法

从字里行间看,我想你可能想要这样的东西(比 geom_jitter 更好地显示数据):

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

enter image description here

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

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

enter image description here

一些虚拟数据:

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,5,6)),prob=c(4,1,prob=c(7,1)) 
  )
)