使用 likert 包在 R 中绘制两个或多个组

如何解决使用 likert 包在 R 中绘制两个或多个组

我正在使用 likert 包，我可以生成分组结果。但是，我不知道如何处理两个（或多个）组，即按两列（性别和国家/地区）对结果进行分组

格式错误，类似这样

likert(ds[,3:7],grouping=ds[,1:2]) %>%  
  plot()

或：

likert(ds[,1]) %>%  
  plot() +
  facet_wrap(~country)

想要的结果可以是这个

或者甚至更好的类似这样的

数据和代码如下

ds <-structure(list(sex_female = structure(c(1L,2L,1L,1L),.Label = c("male","female"),class = "factor"),country = structure(c(2L,2L),.Label = c("br","sp"),eat1_c = structure(c(1L,3L,4L,3L),.Label = c("0","1","2","3"),eat2_c = structure(c(1L,NA,eat3_c = structure(c(2L,eat4_c = structure(c(1L,eat5_c = structure(c(2L,"3"
                                                                                                                                                                                                                                                                                                                   ),class = "factor")),row.names = c(NA,-100L),class = "data.frame")

library(likert)
likert(ds[,1]) %>%  
  plot()