Create print.weighted.r

resolves to data.frame with appended column weights to display weighted datasets for viewability.