маркировка двух сводных данных на одной блочной диаграмме

Я новый пользователь R. • Я хотел бы объединить результаты этих двух групп и сохранить их ярлыки как две группы. Когда я совмещаю, они дают фигуру, которая потеряла этикетки. • Я также хотел бы обозначить числа 1 и 2 (для обеих групп) как «падающие» и «падающие-восходящие». соответственно и с «черным» и «серым» цветом, чтобы легко показать разницу. • Я работаю со сводными результатами

Это формула, которую я использовал до сих пор для создания фигуры:

d0<-matrix(c(x1,x2), ncol=2)
d1<-matrix(c(y1,y2), ncol=2)
lmts<-range(d0,d1)
par(mfrow = c(1, 2))
boxplot(d0, ylim=lmts, xlab="x")
boxplot(d1, ylim=lmts, xlab="y")
result1 <-boxplot(d0, ylim=lmts, xlab="x")
result2<- boxplot(d1, ylim=lmts, xlab="y")
mylist <- list(result1, result2)
groupbxp <- do.call(mapply, c(cbind, mylist))
bxp(groupbxp)

person user3437736    schedule 20.03.2014    source источник


Ответы (1)


Как это?

set.seed(1)   # so example is reproduceable
# create example
x1=sample(50,100,10)
x2=sample(50,100,10)
y1=sample(50,100,10)
y2=sample(50,100,10)
d0<-data.frame(falling=x1,"falling-rising"=x2)  # note use of data.frame(...)
d1<-data.frame(falling=y1,"falling-rising"=y2)
lmts<-range(d0,d1)
par(mfrow = c(1, 2))
boxplot(d0, ylim=lmts, xlab="x", col=c("grey80","grey50"))
boxplot(d1, ylim=lmts, xlab="y", col=c("grey80","grey50"))
result1 <-boxplot(d0, ylim=lmts, xlab="x", plot=F)
result2<- boxplot(d1, ylim=lmts, xlab="y", plot=F)
mylist <- list(result1, result2)
groupbxp <- do.call(mapply, c(cbind, mylist))
par(mfrow=c(1,1))
bxp(groupbxp,fill=T,boxfill=c("grey80","grey50","grey80","grey50"))

Чтобы получить метки, отличные от x, y, используйте data.frame(...) вместо matrix(...). Чтобы получить цвета, используйте boxfill=... в вызове bxp(...). Обратите внимание, однако, что для получения цветов в boxplot(...) аргументы, к сожалению, разные.

person jlhoward    schedule 20.03.2014
comment
Спасибо тебе за это. Это действительно было полезно. Теперь я могу построить их именно так. Я, возможно, не был слишком ясен в одном вопросе. Как мне также показать метки (результат1 и результат2), которые являются именами двух групп? Обратите внимание, что после связывания двух их метки исчезают. Есть ли способ, возможно, нарисовать линию, чтобы отметить это тоже? Могу ли я также дать цвета ключ. например, где каждому оттенку серого присвоено репрезентативное название; падает или падает. поднимается? - person user3437736; 21.03.2014