I have some data here [in a .txt file] which I read into a data frame df,
df <- read.table(\"data.txt\", header=T,sep=\"\\t\")
I remove
ggplot(df_mlt, aes(x = ID1, y = value)) + geom_boxplot(outlier.size = NA) + coord_cartesian(ylim = range(boxplot(df_mlt$value, plot=FALSE)$stats)*c(.9, 1.1))