Update lead.R