在 R 中绘制小​​提琴图

Question

I am trying to create a violin plot using a data frame in the long format. The data frame has 2 columns headed group (containing 2 factors- efficient and inefficient) and Glucose m+6 with corresponding numerical values.

I have tried plotting a violin plot using the following code:

Dta_lng %>% 
  ggplot(aes(x= Group, y= `Glucose m+6`, fill= Group)) +
  geom_violin(show.legend = FALSE) +
  geom_jitter(aes(fill=Group),width=0.1, alpha=0.6, pch=21, color="black")

This is the resulting plot: https://i.stack.imgur.com/VrtbU.jpg

The console also gives 50 warning messages saying groups with fewer than two data points have been dropped.

Answer 1

Perhaps like this:

Data: (Note the different labels!)

df <- data.frame(
  group = c(sample(c("efficient", "inefficient"), 1000, replace = TRUE)),
  Glucose_m_6 = rnorm(1000) 
)

The violin plot with scatter plot:

ggplot(data = df, 
       aes(x = group, y = Glucose_m_6, fill = group)) +
  geom_violin(scale = "count", trim = F, adjust = 0.7, kernel = "cosine") +
  geom_point(aes(y = Glucose_m_6), 
             position = position_jitter(width = .25), size = 0.9, alpha = 0.8)