R多重循环如何根据结果反推出是哪一次循环

2232

收藏 2015-10-20

比如我有这样的一个循环

for i（in 1:50）{
for j (in 1:50){
for k (in 1:50)
……
……
r=P(i)*2+Q(j)*3+V(k)*4
}}

我想知道i j k 分别取值多少的时候，r最小

求教谢谢

扫码加我拉你入群

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

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

全部回复

jinkelazzz

2015-10-20 11:31:19

> x1<-1:10
> x2<-1:10
> x3<-1:10
> r<-matrix(ncol = 4,nrow = length(x1)*length(x2)*length(x3))
> l<-1
> for(i in 1:10)
+ {
+ for(j in 1:10)
+ {
+    for(k in 1:10)
+    {
+    r[l,]<-c(x1[i]^2+x2[j]^3-x3[k]*4,i,j,k)
+    l<-l+1
+    }
+ }
+ }
> r[which.min(r[,1]),2:4]
[1]  1  1 10

扫码加我拉你入群

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

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

hzx21th

2015-10-20 13:03:22

楼上应该去写C语言

扫码加我拉你入群

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

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

维兹

2015-10-20 16:19:51

jinkelazzz 发表于 2015-10-20 11:31
> x1 x2 x3 r l for(i in 1:10)
+ {
+ for(j in 1:10)

请问 R里面可以生成一列数步长为小数么比如这里的X1可以是从0.01到0.1 按步长为0.01增长的数列么

扫码加我拉你入群

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

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

jinkelazzz

2015-10-21 07:47:30

维兹发表于 2015-10-20 16:19
请问 R里面可以生成一列数步长为小数么比如这里的X1可以是从0.01到0.1 按步长为0.01增长的数列么

?seq
去查一下这个函数

扫码加我拉你入群

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

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

维兹

2015-10-21 14:27:18

jinkelazzz 发表于 2015-10-21 07:47
?seq
去查一下这个函数

谢谢你~~O(∩_∩)O~

扫码加我拉你入群

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

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

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

分享

扫码加好友，拉您进群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群