Add peak.R.