#' ## Get the data of interest and get the acLHS sample indices
data(ex_data_2D)
input2D <- ex_data_2D
aclhs_sam <- aclhs(df=input2D, num_samples=50, weights=c(1,1,1), iter=100)
## Set plotting parameters
p_params <- aclhs.plot_params(file_name=tempfile(fileext=".png"),
xlab=expression(bold("Temperature")),
ylab=expression(bold("CO2 Efflux")))
## Create plot
aclhs.plot_scatterplot(df=input2D, aclhs_samples=aclhs_sam,
plot_params=p_params)
Run the code above in your browser using DataLab