# run 3 iterations (please run at least 1000 times for more reliable visuals)
x <- test_lin(reps = 3)
# plot(x)
# plot(x, "a") # view only plot "A"
# plot(x, "d") # view only plot "D". You know what to do (for other plots).
Run the code above in your browser using DataLab