R算法 已投递，谢谢