최대한 멀리 귀하의 질문을 이해할 수 있습니다 (명확하지 않습니다 fivenum
요약을 표시해야합니다) 여기에 하나의 솔루션입니다. 상단 축을 사용하여 요약을 표시합니다.
x <- data.frame(
Time = c(1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,3,3,3,3,3,3,3,3),
Value = c(5,10,15,20,30,50,70,80,100,5,7,9,11,15,17,19,17,19,100,200,300,400,500,700,1000,200))
boxplot(x$Value ~ x$Time)
fivenums <- aggregate(x$Value, by=list(Time=x$Time), FUN=fivenum)
labels <- apply(fivenums[,-1], 1, function(x) paste(x[-1], collapse = ", "))
axis(3, at=fivenums[,1],labels=labels, las=1, col.axis="red")
당신이 추가로이 요약의 글꼴 크기 또는 회전으로 재생할 수 있습니다 물론

. 또한 한 줄에서 줄을 긋을 수 있으므로 레이블의 너비가 좁아집니다.
편집이
text(x = 3 + 0.5, y = fivenums[3,-1], labels=fivenums[3,-1])
을 추가 할 수 있으며 그것을 읽을 수 없습니다 그러나 당신이

을 얻을 것이다 다음은 댓글에 게시 한 내용을 얻기 위하여 다른 boxplots.
data.frame 샘플을 제공 할 수 있습니까? – storaged
x <- data.frame ( c (1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,3,3 , 3,3,3,3,3), c (5,10152030507080100579111517191719100200300400500700 , 1000,200)) 이름 (x) <- c ("시간", "값") => 그래서 지금은 시간에 대한 값을 플로팅하고 싶습니다. 3 boxplot (Time 1,2,3)의 그래프가 표시됩니다. 각 boxplot에는 Median, P10, P90의 값이 표시되어야합니다.) –
이것은 제공 한 코드에 맞지 않습니다. 질문을 할 때 완전히 재현 할 수있는 예제를 제공하는 것이 좋습니다. – storaged