r语言给向量中某元素赋