Example updated, with ggplot2 visu at the end