R code for work with sC clusters