Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/82.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
如何在R中存储来自循环的输出?_R_Loops_Save_Output - Fatal编程技术网

如何在R中存储来自循环的输出?

如何在R中存储来自循环的输出?,r,loops,save,output,R,Loops,Save,Output,如何将输出b1[b2[b3]]存储在此类循环的列表中 检查lappy函数 它的输出是一个结果列表,比for循环工作得更快 如果需要将该列表转换为向量(您可能会这样做),请查看do.call函数 如果这太复杂了,那么您可能应该声明一个向量并附加到它上,只需确保在循环之外声明向量,如下所示: for(i in 1:na) { b1=which(IFUT[,1]==format(data1[i])) b2=which(IFUT[b1,2]==format(data2[i]) b3=whi

如何将输出b1[b2[b3]]存储在此类循环的列表中

检查lappy函数

它的输出是一个结果列表,比for循环工作得更快

如果需要将该列表转换为向量(您可能会这样做),请查看do.call函数

如果这太复杂了,那么您可能应该声明一个向量并附加到它上,只需确保在循环之外声明向量,如下所示:

for(i in 1:na) {     
b1=which(IFUT[,1]==format(data1[i]))
b2=which(IFUT[b1,2]==format(data2[i])
b3=which(IFUT[b1[b2],3]=="12:30:00.000")
????????=b1[b2[b3]]

VectorA首先,制作一个列表来存储结果

VectorA <- c()
for(i in x:y){
#Your Loop + append to vector
}
第二,把循环

list_res = list() #empty list
列表的每个元素都是向量('因为它包含3个元素) 在循环的最后,我们制作了一个向量来存储3个元素B1,B2,B3

#your for loop here
然后,我们得到了列表作为结果

#put these following lines in the for loop
sub_vector = c()#empty vector
sub_vector = c(B1, B2, B3) #one element in the list
list_res[[i]] = sub_vector # append it to the list