为什么这个循环 return NULL

Question

我想替换 URL 中的特定字符串所以我会得到每个 "job" 的数据框链接列。看来我的循环有问题。我该如何解决这个问题？

        dat <- read.table(text = "  Index          job          age            
                                         44        DBA            0      
                                         55        SAS            0      
                                         66        CLOUD          0      
                                         77        AJAX           0      
                                         88        C              1      
                                         99        FULLSTACK      1  ", header = TRUE)

    dat1<-as.list(dat[[2]])
    url  = "'as/DD/p=DD"
    test <-gsub('DD',dat1[[1]],url,ignore.case = T)   # checking the gsub result manually
    test
    #[1] "'as/DBA/p=DBA"    #this is correct

#Now inside a loop    
    s<- for (i in 1:length(dat1)){
            test <-gsub('DD',dat1[[1]],url,ignore.case = T)
         }
    s
    > s
    NULL

为什么我得到 "Null" 而不是以下期望的结果：

    as/DBA/p=DBA
    as/SAS/p=SAS            
    as/CLOUD/p=CLOUD
    as/AJAX/p=AJAX
    as/C/p=C
    as/FULLSTACK/p=FULLSTACK

Answer 1

您没有在任何地方保存您的结果。如果您更改循环以使其选择适当的列表元素并将结果保存到列表中，它应该会为您提供所需的内容。

for (i in 1:length(dat1)){
  test <-gsub('DD',dat1[[i]],url,ignore.case = T)
  dat1[[i]] <- test
}

为什么这个循环 return NULL

Why does this loop return NULL

loops

r

gsub