end of day
trying to subset across data frame and return list
wrote function to derive and plot sample statistics from bootstrapping