У меня есть матрица 1640 на 1640, где каждому квадрату (элементу строки X столбца) назначается цвет. Я пытаюсь создать заговор, где это заговор и отрезан границей Айовы. Я строю график, используя:
rasterImage(image_matrix,
xleft = min(pixel_grid[,1]),
xright = max(pixel_grid[,1]),
ybottom = min(pixel_grid[,2]),
ytop = max(pixel_grid[,2]),
interpolate = FALSE))
, где pixel_grid
назначается
x_limits <- c(min(hosp$Longitude) - 1, max(hosp$Longitude) + 1)
y_limits <- c(min(hosp$Latitude) - 1, max(hosp$Latitude) + 1)
x_seq <- seq(min(x_limits), max(x_limits), length = 1640)
y_seq <- seq(min(y_limits), max(y_limits), length = 1640)
pixel_grid <- expand.grid(x_seq, y_seq)
, где набор данных в больнице имеет координаты широты и долготы для Айовы. Когда я рисую над ним Айову, используя map('state', 'iowa', lwd = 2, add = TRUE)
, я хочу, чтобы Айова обрезала все лишнее вне границы Айовы (я хочу, чтобы Айова была заполнена матрицей изображения, но белым на заднем плане). В настоящее время это выглядит как на картинке:
Есть ли у вас какие-либо идеи / советы?