我想利用sample生成随机数，但是每次生成都是固定的，我把replace设为了false，但是每次还是变化，是怎么回事？
DGP.x<-sample(seq(0,1000,by=1),800,replace = FALSE)
DGP.y<-sample(seq(0,1000,by=1),800,replace = FALSE)
par(pty="s")
plot(DGP.x, DGP.y, main = "DGP",xlim=c(0,1000),ylim=c(0,1000),xaxs = "i", yaxs = "i",asp=1,pch = 20)