added function to calculate super set, in change_bin.R