Function to write posterior distributions of the scaling factors

write_sf_posterior(sf.samp.list, sf.prior, sf.samp.filename)