inst/extdata/examples/R/plot-hello-world.R

In data-science-made-easy/nicerplot: Create NiceR Plots and Save as PNG/PDF/JPEG/SVG

if (file.exists('hello-world.xlsx')) { # plot figures from Excel file:
  nicerplot::nplot('hello-world.xlsx')
} else if (file.exists('hello-world.RData')) { # or plot figures directly in R:
  d <- dget('hello-world.RData')
  nicerplot::nplot(d, type = c('line'), title = c('Hello World'), x_title = c('x'), y_title = c('y'), style = c('default'), open = FALSE)
} else print(paste('Please download', xlsx_data_file, 'or', rdata_file, 'to create the nice R plot.'))