Return a bar plot of the samples

DEPRECATED, use bar_plot

get_bar_plot(ta, n = 12, x = sample_clustered, geom_bar = T)