Create stat.R