Update peak-8.r