如何用R中的另一个矢量元素替换一个矢量元素?