Responsive SVG from R