Я использую grid.hexagons() в пакете 'hexbin' для построения набора данных большого размера (3 переменные с 1,7 миллионами наблюдений в каждой).Следующее генерирует фигуру, которой я довольно доволен:
data<-read.csv("table.csv")
library(hexbin)
bin<-hexbin(data$var1,data$var2,xbins=35,IDs=TRUE)
hvp1<-plot(bin, xlab="Var 1", ylab="Var 2")
meanbin<-hexTapply(bin,data$r1,mean)
pushHexport(hvp$plot.vp)
grid.hexagons(bin,style=c("colorscale"),use.count=FALSE,cell.at=meanbin,colramp= function(n){BTY(n,beg=1,end=256)})
Это дает мне это:
Я быКак добавить легенду, соответствующую значениям 'r1', представленным на рисунке.Я знаю, что это возможно с gplot.hexbin() или grid.hexlegend(), но ни один из них не поддерживает опции use.count=FALSE и cell.at=''.Есть идеи, как мне этого добиться?
Я не женат на использовании 'hexbin' для составления графика и подумал об использовании 'bigvis' (https://github.com/hadley/bigvis), но нашел документацию неясной. Прямое построение всех данных занимает слишком много времени, так что какой-топодход биннинга кажется необходимым.
Спасибо!