pipeR::pipeline(
rAmCharts::amPieChart(valueField = "value", titleField = "key", creditsPosition = "top-right",
backgroundColor = "#7870E8"),
rAmCharts::setDataProvider(data.frame(key = c("FR", "US"), value = c(20,10))),
rAmCharts::setExport(position = "bottom-left")
)
Run the code above in your browser using DataCamp Workspace