adding 4peaks plot function