##the short example
run_MC_LM_OSL_TUN(
A = 1,
rho = 1e-3,
times = 0:100,
clusters = 10,
N_e = 100,
r_c = 0.1,
delta.r = 1e-1,
method = "seq",
output = "signal") %>%
plot_RLumCarlo(norm = TRUE)
if (FALSE) {
## the long (meaningful) example
results <- run_MC_LM_OSL_TUN(
A = 1,
rho = 1e-3,
times = 0:1000,
clusters = 30,
N_e = 100,
r_c = 0.1,
delta.r = 1e-1,
method = "par",
output = "signal")
plot_RLumCarlo(results, norm = TRUE)
}
Run the code above in your browser using DataLab