## Set the parameters
p_params <- aclhs.plot_params(file_name=tempfile(fileext=".png"),
plot_title=expression(bold("Sample Distribution")),
xlab=expression(bold("X [km]")),
ylab=expression(bold("Y [km]")),
legend="topright")
## Access one of the the set parameters
p_params$plot_title
Run the code above in your browser using DataLab