상자 그림 옆에 점으로 표시된 숫자

Question

상자 플롯과 함께 한 그래프에 그림을 그려야합니다.

는 다음과 같이 시작 :

data    <- data.frame(matrix(rexp(50), 50)) 
colnames(data)[1] <- c("values") 
data$s1   <- as.factor(c(rep("AA", 30), rep("AC", 18), rep("CC", 2))) 
data$s2   <- as.factor(c(rep("AA", 25), rep("AG", 22), rep("GG", 3))) 

boxplot(as.numeric(values)~s1,data=data, outline=F, range=1.5) 
boxplot(as.numeric(values)~s2,data=data, outline=F, range=1.5) 

나는 거의 내가 원하는 것을 얻을. 그러나 CC와 GG 그룹의 숫자가 작기 때문에 CC와 GG 그룹 각각 2 ~ 3 개의 도트를 그려야한다고 조언했습니다.

또는 이전 데이터를 사용하여 간단한 chartplot을하는 것이 더 좋을까요? 어떻게이 일을 끝낼 수 있습니까?

Answer 1

이게 당신이 찾고 있는게 있니? 이 같은

par(mfrow=c(1, 2)) 
boxplot(as.numeric(values) ~ s1, 
     data=subset(data, data$s1=="AA" | data$s1=="AC")) 
stripchart(as.numeric(values) ~ s1, 
      data=data, add=TRUE, vertical=TRUE, pch=1, lwd=1) 

boxplot(as.numeric(values) ~ s2, 
     data=subset(data, data$s1=="AA" | data$s1=="AG")) 
stripchart(as.numeric(values) ~ s2, 
      data=data, add=TRUE, vertical=TRUE, pch=1, lwd=1) 

주기 뭔가 :