Create cir_stat.R