Rsolution2.R