Обратная ось х в шестнадцатеричном графике

Question

Можно ли повернуть ось X для шестнадцатеричного графика?

hexbinplot(y~x, xbins=30,xlim = rev(range(x)))

Опция xlim = rev(range(x)) не сработала.

Answer 1

Вы можете многократно умножить x на -1, чтобы перевернуть график, а затем использовать аргумент scales, чтобы поменять метки

.

set.seed(1) 
dd <- data.frame(x=rnorm(1000),y=rnorm(1000))
y = dd$y ; xnew=-dd$x

library(hexbin)
hexbinplot(y ~ xnew, scales=list(x=list(at = pretty(xnew), 
                                        labels = rev(pretty(xnew)))))

Answer 2

Я не знаю, как это сделать с hexbin::hexbinplot, но с ggplot2 довольно просто, используя geom_hex и scale_x_reverse.

 dd <- data.frame(x=rnorm(1000),y=rnorm(1000))
 ggplot(dd,aes(x,y))+geom_hex()+scale_x_reverse()