Create A07-StatisticsWithR