Create lead.R