powered by
## S3 method for class 'traps': rotate(object, degrees, centrexy = NULL, \dots)
traps
rbind.traps
shift.traps
hollow1 <- make.grid(nx = 8, ny = 8, hollow = TRUE) hollow2 <- make.grid(nx = 8, ny = 8, hollow = TRUE) nested <- rbind (hollow1, rotate(hollow2, 45, c(70, 70))) plot(nested, gridlines = FALSE)
Run the code above in your browser using DataLab