r for循環未遍歷每個項目

Question

問題：

我的for循環似乎沒有遍歷我的數據幀。 我認為這是因為當它到達調試打印行時，它只會打印出所有內容。 FOR中的代碼可以獨立工作

目標

我想對相當大的數據集中的所有組進行關聯。 該代碼應該遍歷唯一的路徑列表（var3），並在每個路徑上運行關聯。

數據框設置：

df.1 
id var1 var2 var3
1  23   2.1  "this"
2  32   2.2  "is"
3  13   2.3  "is"

碼

# reduce size
directory.df$var1<-format(round(directory.df$var1/1000,1),nsmall=1)
directory.df$var2<- format(round(directory.df$var2/1000,1),nsmall=1)

df.1 <- unique(directory.df$var3)
df.1 <- data.table(unique.directories)

for (current.dir in df.1)
{
 print (current.dir) 
 directory.group <- subset(directory.df, var3 == current.dir)
 directory.group$var1<- as.numeric(directory.group$var1)
 directory.group$var2<- as.numeric(directory.group$var2)

 ## correlation ##
 cor(directory.group$var1, directory.group$var2)
}

當我運行代碼時，print（current.dir）將打印出整個列表。 似乎for的第一行（df.1中的current.dir）采用var3的所有值並將其放在current.dir中。

Answer 1

我只需要刪除這行df.1 <-data.table（unique.directories） ，它就可以了。

#  reduce size
directory.df$var1<-format(round(directory.df$var1/1000,1),nsmall=1)
directory.df$var2<- format(round(directory.df$var2/1000,1),nsmall=1)

df.1 <- unique(directory.df$var3)

for (current.dir in df.1)
{
 print (current.dir) 
 directory.group <- subset(directory.df, var3 == current.dir)
 directory.group$var1<- as.numeric(directory.group$var1)
 directory.group$var2<- as.numeric(directory.group$var2)

 ## correlation ##
 cor(directory.group$var1, directory.group$var2)
}