library(officer)
fp_text_settings <- list(
serie1 = fp_text(font.size = 7, color = "red"),
serie2 = fp_text(font.size = 0, color = "purple"),
serie3 = fp_text(font.size = 19, color = "wheat")
)
barchart <- ms_barchart(
data = browser_data,
x = "browser", y = "value", group = "serie")
barchart <- chart_data_labels(barchart, show_val = TRUE)
barchart <- chart_labels_text( barchart,
values = fp_text_settings )
Run the code above in your browser using DataLab