comediator_type.Rd
Get mediators of same type as pheno_name
comediator_type(comed, peaks_df, pheno_name, doThis)
object from `comediator_region`
do this if `TRUE`