Я создаю скриптовый сюжет, используя ggplot в R. Я хочу создать скрипичный сюжет, показывающий различное количество чисел в каждом сюжете, как это.
Я использовал этот код для создания такого графика.
data<-read.csv("Clinical violion file.csv")
mat <- reshape2::melt(data.frame(data), id.vars = NULL)
pp <- ggplot(mat, aes(x = variable, y = value)) + geom_violin(scale="width",adjust = 1,width = 0.5,aes(color=factor(variable)))+ geom_point()
pp
У меня есть такой сюжет.
Но я не знаю, как добавить точку, показывающую различное число на каждом графике.
Вот заголовок моего файла.
Я решил эту проблему, выполнив это.
library(ggbeeswarm)
pp <- ggplot(mat, aes(x = variable, y = value)) + geom_violin(scale="width",adjust = 1,width = 0.5,aes(color=factor(variable)))+geom_quasirandom(aes(color=factor(variable)),groupOnX=FALSE)