library("grid")
set.seed(153)
x <- rnorm(10000)
y <- rnorm(10000)
bin <- hexbin(x,y)
smbin <- smooth.hexbin(bin)
erodebin <- erode.hexbin(smbin, cdfcut=.5)
plot(erodebin)
## bivariate boxplot
hboxplot(erodebin, main = "hboxplot(erodebin)")
我拿这段试了一下，你看如果用大于100的set.seed的话，后面rnorm设100，也是跑的出来的
你要是怕不保险，set.seed用小点？
扫码加好友，拉您进群
全部版块
我的主页
收藏
