View source: R/2_ggproto_visualize.r
proto_text | R Documentation |
Adds geom_text()
of the projected data.
proto_text( aes_args = list(vjust = "outward", hjust = "outward"), identity_args = list(nudge_x = 0.05), row_index = TRUE )
aes_args |
A list of arguments to call inside of aes().
aesthetic mapping of the primary geom. For example,
|
identity_args |
A list of static, identity arguments passed into
the primary geom. For instance,
|
row_index |
A numeric or logical index of rows to subset to. Defaults to NULL, all observations. |
Other ggtour proto functions:
append_fixed_y()
,
facet_wrap_tour()
,
ggtour()
,
proto_basis()
,
proto_default()
,
proto_density2d()
,
proto_density()
,
proto_hex()
,
proto_highlight()
,
proto_hline0()
,
proto_origin()
,
proto_point()
library(spinifex) dat <- scale_sd(penguins_na.rm[, 1:4]) clas <- penguins_na.rm$species bas <- basis_pca(dat) mv <- manip_var_of(bas) gt_path <- save_history(dat, grand_tour(), max_bases = 5) ggt <- ggtour(gt_path, dat, angle = .2) + proto_text(list(color = clas)) animate_plotly(ggt) ## Custom labels, subset of points ggt2 <- ggtour(gt_path, dat) + proto_text(list(color = clas, size = as.integer(clas)), list(alpha = .7), row_index = 1:15) animate_plotly(ggt2)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.