First R code to analyse organograms