问题请教

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

x是n维向量，如何用向量表示    i*(x[i]-x[i-1])  ,i=1,....,n   ，其中x[0]=0
多谢大家了

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：如何用 如何

x <- c(1,2,3,4,5,6,7,8,9,10)
y <- numeric(length(x))
for(i in 1:length(x)){
  if(i==1){
    y[1] =x[1]
  }else{
    y[i] <- i*(x[i]-x[i-1])
}
}
y

可以用向量化吗？
=牛人

非常感谢！这个能用向量表示出来吗？

(1:n) * c(x[1], diff(x))

qoiqpwqr 发表于 2012-11-16 00:32
(1:n) * c(x[1], diff(x))

如果 此题 变为  i*(x-2x[i-1])
又如果做呢？

i*(x[i]-2x[i-1])

jmpamao 发表于 2012-11-16 14:10
i*(x-2x)

创建两个向量，一个x[1]到x[n]，另外一个是x[0]到x[n-1]，然后做运算

qoiqpwqr 发表于 2012-11-16 22:08
创建两个向量，一个x[1]到x[n]，另外一个是x[0]到x[n-1]，然后做运算

(1:length(x))*(x[1:length(x)]-2*c(0,x[1:(length(x)-1)]))

谢谢