Этикетировочного точку диаграммы рассеяния в boxplot И в резюме boxplot в графе в R

Question

Bonjour Все,

мне нужно помощь, чтобы найти решение для маркировки в boxplot разброса.

Как вы можете видеть ниже, есть два данных: сначала все макрокосмы, а во-вторых - среднее значение каждого макрокосма.

Tab1 // запрос результата

 1  2  3  4  5  6 
1 13.2089 13.3161 13.2497 13.2268 13.2209 11.6036 
2 13.2923 13.3869 13.2950 13.2876 13.2922 11.7044 
3 13.4493 13.5394 13.4450 13.4735 13.4689 11.9483 

означает
1 15,43801 15,38659 15,23252 15,50707 15,67684 15,25383

Моя проблема в том, как показать этикетку в каждой точке график два. Я хочу маркировать каждую точку своим no.macrocosme.

Это мой маленький код:

#Macrocosme 
Mac = svalue(cbMacro) 

#Add boxplots to all Macs 
par(mfrow = c(1, 2)) 
boxplot(Tab1, main="Temperature of Macrocosme", xlab="No. Macrocosme", ylab="Temperature in Celcius", col=(c("gold","darkgreen")),ylim=range(c(min(vmin),max(vmax)))) 
points(1:length(Mac), means,pch = 22) 

#Add boxplots to a median of all Macs 
boxplot(means, main="Mean Temperature of all the Macrocosme", xlab="Mean", ylab="Temperature in Celcius") 
with(Tab1, stripchart(means, method="jitter", vertical=TRUE, add=TRUE, col="red",pch = 20)) 

Я попытался с функцией текста() -> показать номер в boxplot не в диаграмме рассеяния, а пакет textxy() -> ничего не показывают

Я думаю, что существует проблема, когда я определяю значения x, y .. hmm .. Возможно ли, что мы покажем сводку каждого квадрата в графе (медиана, Q1-Q3)?

Это график, который я создаю: Как вы можете видеть ниже, есть два графика, справа - квадрат всех макрокосм со средними значениями, а слева - квадрат с разбросом всех означает макрокосмы.

Спасибо, прежде чем за вашу помощь ..

С уважением,

Yougyz

Answer 1

Текст функции должен работать найти. Например,

R> x = rnorm(10) 
R> boxplot(x, ylim=c(-3, 3)) 
R> text(1, 1, "Hi", col=2) 

В вашем примере, попробовать что-то вроде:

text(1, means, LETTERS[length(means)], col=2) 

Это должно отображать буквы на красные точки. Однако, в своем призыве к функции полоскового графика, вы «дрожали» или «шевелили» точки. Поскольку у вас есть только несколько точек, не дрожайте их (возможно, опускайте аргумент метода), и следующие должны работать:

text(1.3, means, LETTERS[length(means)], col=2)