the layers number is only used at top layers
update author and other informtation
Format the R script