This is the R code for analysis of Triaxus code