Skip to main content
2 de 2
correção da formatação de lista e adição do resultado do console
saulogr
  • 128
  • 6

Você pode fazer o seguinte:

  • Para cada linha identificar qual está preenchida;
  • Associar para a coluna N_VOLTAS o valor dessa colunas.

Faria da seguinte maneira:

df <- data.frame(var1 = c(rep(NA, 5), 1, 1, 1, rep(NA, 4), 1),
                 var2 = c(rep(NA, 3), 19, 13, rep(NA, 8)),
                 var3 = c(rep(NA, 8), 10, 8, 7, 5, NA),
                 n_voltas = c(32, 47, 12, rep(NA, 10)))
>df
   var1 var2 var3 n_voltas
1    NA   NA   NA       32
2    NA   NA   NA       47
3    NA   NA   NA       12
4    NA   19   NA       NA
5    NA   13   NA       NA
6     1   NA   NA       NA
7     1   NA   NA       NA
8     1   NA   NA       NA
9    NA   NA   10       NA
10   NA   NA    8       NA
11   NA   NA    7       NA
12   NA   NA    5       NA
13    1   NA   NA       NA

for (i in 1:nrow(df)) {

  #identificando qual coluna está preenchida
  var1 = is.na(df[i,1])
  var2 = is.na(df[i,2])
  var3 = is.na(df[i,3])
  
  if (var1 == FALSE){
  df[i, 4] = df[i, 1]
  }else if (var2 == FALSE){
  df[i, 4] = df[i, 2]
  } else if (var3 == FALSE) {
  df[i, 4] = df[i, 3]
  }else {
    #valor para quando todas estiverem vazias
    
}
}

   var1 var2 var3 n_voltas
1    NA   NA   NA       32
2    NA   NA   NA       47
3    NA   NA   NA       12
4    NA   19   NA       19
5    NA   13   NA       13
6     1   NA   NA        1
7     1   NA   NA        1
8     1   NA   NA        1
9    NA   NA   10       10
10   NA   NA    8        8
11   NA   NA    7        7
12   NA   NA    5        5
13    1   NA   NA        1

Essa maneira considera que apenas umas das colunas estará preenchida e que caso tenha mais de uma, a primeira que será utilizada na coluna n_voltas.

saulogr
  • 128
  • 6