我需要自定义六角形图的轴刻度标记和刻度标记:
在分箱之前最佳转换的Hexbinning数据:
library(hexbin)
set.seed(25)
df<-data.frame(x=(rnorm(10000, mean=10, sd=1))^2,y=(rnorm(10000, mean=10, sd=1))^2)
hbo <- hexbin(sqrt(df))
相应的情节将是
plot(hbo,legend=FALSE,xlab="sqrt(x)",ylab="sqrt(y)",main="Transformed data")
我想反向转换轴刻度标签,这样恼人的... ,xlab="sqrt(x)",ylab="sqrt(y)", ...
就可以再次成为“x”和“y”。
对于基础grafics派生图,可以通过
来抑制轴(此处仅为x轴)plot(hbo,legend=FALSE,main="Quasi-backtranformed data",xaxt="n")
然后发出
axis(side=1,at=seq(6,14,2),labels=seq(6,14,2)^2)
使用反转换标签重新创建相应的轴。
但这确实 NOT 工作。它什么都不做。 hexbin plot方法确实不会尊重@BondedDust假定的通用绘图中的大多数par
个参数。
然后,hexbin文档说它使用grid-package进行绘图。在没有使用网格的情况下,到目前为止我没有那么好,我觉得自己总是这样做。
library(grid)
grid.xaxis(at = seq(6,14,2), vp = viewport(w = .5, h = 0.01), name = "gxa")
再次没有反应(请不要对我大吼大叫)。
在上面,绘图的轴标签(hexbin-objects)通常与ticklabels重叠,所以我很感激基于非Illustrator的方法来创建奇特的hexbin-plot。
非常感谢关于hexbin :: tick_mark_and_tick_label_manipulation的建议。