clear all the geom_stats() layer previously added
stats_null()
dataDir <- system.file("extdata",package="flowWorkspaceData") gs <- load_gs(list.files(dataDir, pattern = "gs_manual",full = TRUE)) #autoplot display pop stats by default p <- autoplot(gs, "CD4")#>#it is easy to remove the default stats p <- p + stats_null() #and add a new one p <- p + geom_stats(type = "count")