Update APackOfTheClones objects to the latest format

This generic function updates objects created by APackOfTheClones to the latest format or structure required by the package. It supports Seurat objects and ggplot objects generated by APackOfTheClones functions.

The current possible changes made by the function are:

• when called on ggplots generated by vizAPOTC() / APOTCPlot(), layer names will be made unique.

Usage

updateApotc(x, verbose = TRUE, ...)

Arguments

x

An object to update. Supported types are Seurat objects and ggplot objects generated by APackOfTheClones.

verbose

Logical. Whether to print messages about the update process. Default is TRUE.

...

Additional arguments passed to methods. Currently unused.

Value

The updated object, or the original object if no update is required.

Examples

data("combined_pbmc")
apotc_plot <- vizAPOTC(combined_pbmc)
#> Initializing APOTC run...
#> * Setting `clone_scale_factor` to 0.3
#> * id for this run: vizAPOTC
#> 
#> Packing clones into clusters
#> 
[                                                  ] 0%
[==========                                        ] 21%
[=================                                 ] 34%
[======================                            ] 45%
[==========================                        ] 52%
[===============================                   ] 62%
[===================================               ] 70%
[=======================================           ] 78%
[=========================================         ] 83%
[===========================================       ] 86%
[=============================================     ] 91%
[==============================================    ] 92%
[==============================================    ] 93%
[================================================  ] 96%
[================================================  ] 97%
[================================================= ] 99%
[==================================================] 100%
#> 
#> 
#> repulsing all clusters | max iterations = 20
#> 
[                                                  ] 0%
[==                                                ] 5%
[=====                                             ] 10%
[=======                                           ] 15%
[==========                                        ] 20%
[============                                      ] 25%
[===============                                   ] 30%
[=================                                 ] 35%
[====================                              ] 40%
[==================================================] 100%
#> 
#> Completed successfully, time elapsed: 0.135 seconds
#> Plotting...
#> * generated ggplot object
apotc_plot <- updateApotc(apotc_plot, verbose = TRUE)
apotc_plot