The solutions
The R scripts to create the corresponding figures