No [tag:ggplot2] os outliers são calculados no momento em que o gráfico vai ser desenhado (quando der `print(plot)`).

A função responsável por isso será a função `StatBoxplot` ([código-fonte](https://github.com/tidyverse/ggplot2/blob/master/R/stat-boxplot.r)) que é executada dentro do "ambiente" do gráfico.

Podemos forçar a execução dos cálculos por meio da função `ggplot_build()`. Assim temos

    p <- dataset%>%
      gather(.,key='group',value='var',V1:V6) >%
      ggplot(aes(group,var,fill=kmeans))+
      facet_grid(kmeans~.)+
      geom_boxplot(outlier.color='yellow',outlier.shape=21,
                   outlier.fill='black',outlier.size=1, coef = 2)+
      stat_summary(fun.y=mean, geom="line", aes(group=1))+
      stat_summary(fun.y=mean, geom="point")+
      theme_dark()
    
    data <- ggplot_build(p)
    outliers <- data$data[[1]]$outliers
    str(outliers)
    List of 18
     $ : num(0) 
     $ : num 2242
     $ : num(0) 
     $ : num 2240
     $ : num 809
     $ : num(0) 
     $ : num(0) 
     $ : num(0) 
     $ : num(0) 
     $ : num 823
     $ : num(0) 
     $ : num(0) 
     $ : num [1:2] 850 848
     $ : num(0) 
     $ : num(0) 
     $ : num(0) 
     $ : num(0) 
     $ : num(0)