Changed RScript03 on Stat