Criar um loop no R

Gente, bom dia! Tudo bem?

Não estou conseguindo transformar a sintaxe abaixo em um loop.
A ideia é criar ao final um dataframe com uma operação de agregar novas colunas a um dataframe já existente.

resp_aberta <- data.frame(abre.resp(df_CAD4[,2]))
gab_CAD4 <- caderno_lc %>% 
  filter(Caderno == 4) %>% 
  dplyr::select(ID_EQ, Gabarito)

resposta_corrigida <- data.frame(key2binary(resp_aberta, gab_CAD4[,2]))

df_CAD4 <- cbind(df_CAD4, resposta_corrigida)

names(df_CAD4) <- c('INSC', 'TX_RESPOSTA', 'ID_CADERNO', gab_CAD4[ ,1])
rm(resposta_corrigida, gab_CAD1, resposta_corrigida, resp_aberta)

Abraços

Eduardo,

Para poder te ajuda, acho que preciso de mais informações. O que você quer fazer no loop?

Oi @clente, tudo bem?

Eu tenho esse dataframe df_4EF, ele tem na coluna 2 uma string com 14 letras, eu quero pegar essa sting abrir em 14 colunas com essa funçao abre.resp. Depois ele pega o gabarito correpondente por caderno e corrige essas respostas. Depois ele agrega no dataframe original as respostas corrigidas, sendo cada 0 ou 1 em uma coluna.

Me fiz entender?

Abraços

Será que isso funciona?

for (i in 2:ncol(gab_CAD4)) {
  resposta_corrigida <- data.frame(key2binary(resp_aberta, gab_CAD4[,i]))
  df_CAD4 <- cbind(df_CAD4, resposta_corrigida)
}