楼主: levyangel
2955 4

[问答] 请教r=(r[1],r[2],...,r[m]),怎么用R表示:x[i]=i+r[m]+r[m-1]+...+r[m-i+1] ,i=1...m [推广有奖]

  • 0关注
  • 0粉丝

本科生

33%

还不是VIP/贵宾

-

威望
0
论坛币
245 个
通用积分
0
学术水平
0 点
热心指数
0 点
信用等级
0 点
经验
1475 点
帖子
55
精华
0
在线时间
86 小时
注册时间
2006-11-23
最后登录
2014-5-5

楼主
levyangel 发表于 2011-10-17 17:24:17 |AI写论文

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群
赵安豆老师微信:zhaoandou666

经管之家联合CDA

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

感谢您参与论坛问题回答

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

+2 论坛币

如题
谢谢
二维码

扫码加我 拉你入群

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

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


沙发
qoiqpwqr 发表于 2011-10-17 21:47:20
m <- length(r)
x <- rep(NA, m)
for (i in 1:m) {
    x[i] <- i + sum(r[(m-i+1):m])
}

藤椅
shenbaiseshatan 在职认证  发表于 2011-10-17 21:51:05
  1. #假设r的类型是向量
  2. r.rev<-rev(r);
  3. rev(cumsum(r.rev))+seq(along=r)
复制代码
已有 2 人评分学术水平 热心指数 信用等级 收起 理由
proc.com + 1 + 1 + 1 好的意见建议
AspenRd + 1 + 1 + 1 热心帮助其他会员

总评分: 学术水平 + 2  热心指数 + 2  信用等级 + 2   查看全部评分

胜人者有力,自胜者强!

板凳
shenbaiseshatan 在职认证  发表于 2011-10-17 21:53:25
qoiqpwqr 发表于 2011-10-17 21:47
m
还是你出手快
胜人者有力,自胜者强!

报纸
levyangel 发表于 2011-10-18 09:03:15
谢谢大家

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注cda
拉您进交流群
GMT+8, 2026-1-24 03:05