Create Average_Raw_Intensity.R