diff --git a/R/object_ops.R b/R/object_ops.R index ab46e6930..eca11487a 100644 --- a/R/object_ops.R +++ b/R/object_ops.R @@ -773,6 +773,15 @@ export_report <- function( htmltools::as.tags() %>% htmltools::save_html(file = filename) + } else if (inherits(x, "ptblank_multiagent")) { + + object_type <- "multiagent" + + x %>% + get_multiagent_report() %>% + htmltools::as.tags() %>% + htmltools::save_html(file = filename) + } else if (inherits(x, "ptblank_tbl_scan")) { object_type <- "table scan" diff --git a/R/scan_data.R b/R/scan_data.R index 2d3490099..02c30f581 100644 --- a/R/scan_data.R +++ b/R/scan_data.R @@ -1315,8 +1315,8 @@ probe_interactions <- function(data) { ggforce::geom_autodensity() + ggplot2::geom_density2d() + ggforce::facet_matrix( - rows = ggplot2::vars(gt::everything()), layer.diag = 2, layer.upper = 3, - grid.y.diag = FALSE) + + rows = ggplot2::vars(dplyr::everything()), layer.diag = 2, + layer.upper = 3, grid.y.diag = FALSE, labeller = ggplot2::label_value) + ggplot2::theme_minimal() + ggplot2::theme( axis.text.x = ggplot2::element_text(