R MarkDown and Leaflet Assignment