Will soon replace panel. See examples and vignettes.
mosaic_engine(coo_list, dim, asp = 1, byrow = TRUE, fromtop = TRUE,
sample = 60, relatively = FALSE, template_size = 0.92)mosaic(x, ...)
# S3 method for Out
mosaic(x, f, relatively = FALSE, pal = pal_qual,
sample = 60, paper_fun = paper_white, draw_fun = draw_outlines,
legend = TRUE, dim = NA, asp = 1, byrow = TRUE, fromtop = TRUE, ...)
# S3 method for Opn
mosaic(x, f, relatively = FALSE, pal = pal_qual,
sample = 60, paper_fun = paper_white, draw_fun = draw_curves,
legend = TRUE, dim = NA, asp = 1, byrow = TRUE, fromtop = TRUE, ...)
# S3 method for Ldk
mosaic(x, f, relatively = FALSE, pal = pal_qual,
sample = 60, paper_fun = paper_white, draw_fun = draw_landmarks,
legend = TRUE, dim = NA, asp = 1, byrow = TRUE, fromtop = TRUE, ...)
list
of shapes
numeric
of length 2, the desired dimensions for rows and columns
numeric
the yx ratio used to calculate dim
(1 by default).
logical
whether to order shapes by rows
logical
whether to order shapes from top
numeric
number of points to coo_sample
logical
if TRUE
use coo_template_relatively
or, if FALSE
(by default) coo_template.
In other words, whether to preserve size or not.
numeric
to feed coo_template(_relatively)
.
Only useful to add padding around shapes when the default value (0.95) is lowered.
any Coo object
additional arguments to feed the main drawer
if the number of shapes is > 1000 (default: 64).
If non-numeric (eg FALSE
) do not sample.
factor specification to feed fac_dispatcher
one of palettes
a papers function (default: paper
)
one of drawers for pile.list
logical
whether to draw a legend (will be improved in further versions)
a list of templated and translated shapes
# NOT RUN {
# On Out ---
bot %>% mosaic
bot %>% mosaic(~type)
# As with other grindr functions you can continue the pipe
bot %>% mosaic(~type, asp=0.5) %>% draw_firstpoint
# On Opn ---- same grammar
olea %>% mosaic(~view+var, paper_fun=paper_dots)
# On Ldk
mosaic(wings, ~group, pal=pal_qual_Dark2, pch=3)
# On Out with different sizes
# would work on other Coo too
shapes2 <- shapes
sizes <- runif(30, 1, 2)
shapes2 %>% mosaic(relatively=FALSE)
shapes2 %>% mosaic(relatively=TRUE) %>% draw_centroid()
# }
Run the code above in your browser using DataLab