library(tidyverse)
c=sample(viridis::turbo(321), 321);t=0:320
x=t*cos(3*t^2);y=t*sin(2*t)
ggplot(tibble(x,y),aes(x,y))+scale_fill_identity()+ggvoronoi::geom_voronoi(aes(fill=c))+coord_fixed()+theme_void()

1 7

You created a great framework for
library(tidyverse)
c=viridis::turbo(321);t=0:320
x=t*cos(t);y=t*sin(t)
ggplot(tibble(x,y),aes(x,y))+scale_fill_identity()+ggvoronoi::geom_voronoi(aes(fill=c))+coord_fixed()+theme_void()

1 19