r语言for循环嵌套，r语言for循环语句案例

R 语言 for循环

首先有个概念，循环中的变量是i，每次循环之后都会更新i的值，直到循环结束。循环中i的取值范围在1:5。
循环中，每次循环都打印出i的结果。
循环结束后，i不再更新，打印i输出的就是i最后一次的取值，并且一直都是这个值，除非你再次给i赋值。

第二个问题，我不知到是不是这个意思，你需要保存每一步循环中得到的结果，最后在循环结束之后全部把它们输出出来。

我就按我理解的这个意思写一下。

t<-array()
for(i in 1:5) t[i]<-i
a<-list(t);a

希望对你有帮助。

R语言for循环

我的建议是可能要大改整个程序：用一个list（比如叫data.list）把所有data frame或者之类的东西装起来，用的时候用data.list[[i]]来取出第i个data frame。用sqldf的时候，第一个和第三个可以用paste来写命令，第二个和第四个可能需要先用一个data frame（比如叫data）来暂时存储data.list里的一个data frame再操作sqldf。总的来说像这样（没怎么用过SQL，可能有问题）：
dataold_list<-dataold.list<-datanew_list<-datanew.list<-vector(“list”,100)
for(iin1:100){
dataold_list[[i]]<-sqldf(paste(“select*fromDataolda,num”,i,”b
wherea.LOAN_NO=b.LOAN_NO”,sep=””))
dataold_list[[i]]<-dataold_list[[i]][,-1]
data<-dataold_list[[i]]
dataold.list[[i]]<-sqldf(“select*froma,datab
wherea.LOAN_NO=b.LOAN_NO”)
datanew_list[[i]]<-sqldf(paste(“select*fromDatanewa,num”,i,”b
wherea.LOAN_NO=b.LOAN_NO”,sep=””))
datanew_list[[i]]<-dataold_list[[i]][,-1]
data<-datanew_list[[i]]
datanew.list[[i]]<-sqldf(“select*froma,datab
wherea.LOAN_NO=b.LOAN_NO”)
}

R语言怎么让for陷入无限循环知道满足确定的条件才能break？？

展开全部

这么看来用while方便点

R语言，关于for 和if

#Q1 x=0.5 n=0 while(abs(x-cos(x))&gt;0.01){ x=cos(x) n=n+1 } print(sprintf(‘%i,x=%.3f,cos(x)=%.3f’,n,x,cos(x))<p> </p> <p>Q2，正好刚刚回答了另一个R的质数的问题(http://zhidao. .康姆/question/571598738)，借过来用一下。这个数比较大，要运行一段时间，别着急。</p> Eratosthenes&lt;-function(n){ if(n&gt;2){ sieve&lt;-seq(2,n) primes&lt;-c() for(iinseq(2,n)){ if(any(sieve==i)){ primes&lt;-c(primes,i) sieve&lt;-c(sieve[(sieve%%i)!=0],i) if((i-2)%in%sieve){ print(sprintf(“%i,%i”,(i-2),(i))) } } } return(primes) }else{ print(“n&gt;2″) } } primes=Eratosthenes(1000^2) [1]”3,5″ [1]”5,7″ [1]”11,13″ [1]”17,19″ [1]”29,31″ [1]”41,43″ [1]”59,61″ [1]”71,73” …

本人R语言小白，在使用R语言时，下面的for循环提示参数长度为0，请问应该如何更改呢？

in 1:nrow(metadata) : 参数长度为零,可能是metadata内没有数据。
metadata <- jsonlite::fromJSON(‘metadata.cart.2020-04-22.json’)
可能是数据读取失败，检查数据下载是否成功，格式是否正确?