Как построить плитки, полученные в результате тесселяции deldir, с помощью ggplot в R?

Теперь, когдаggvoronoiпакет больше не работает вR, Я используюdeldirпостроить ячейки Вороного, обрезанные выпуклой оболочкой, для множества точек следующим образом:

      library(deldir)
set.seed(1)
x <- runif(50)
y <- runif(50)

tesselation <- deldir(x, y)
tiles <- tile.list(tesselation)

s <- seq(0, 2 * pi, length.out = 3000)
circle <- list(x = 0.5 * (1 + cos(s)),
               y = 0.5 * (1 + sin(s)))

plot(tiles, pch = 19,
     col.pts = "white",
     border = "white",
     fillcol = hcl.colors(50, "viridis"),
     clipp = circle)

Я хочу создать график градиента для плиток в соответствии с площадью плиток. Или каким-то образом импортироватьtilesвggplotа затем используйте такие функции, какscale_fill_gradientnдля достижения моей цели. Не могли бы вы мне помочь?

Источник

0 ответов

Другие вопросы по тегам