Combine coluna para remover NA's

Eu tenho algumas colunas em R e para cada linha sempre haverá um valor em uma delas, o restante será de NA. Eu quero combinar estes em uma coluna com o valor não-NA. Alguém sabe de uma maneira fácil de fazer isso. Por exemplo, eu poderia ter o seguinte:

data <- data.frame('a' = c('A','B','C','D','E'),
                   'x' = c(1,2,NA,NA,NA),
                   'y' = c(NA,NA,3,NA,NA),
                   'z' = c(NA,NA,NA,4,5))

Então eu teria

'a' 'x' 'y' 'z'  
 A   1   NA  NA  
 B   2   NA  NA  
 C  NA   3   NA  
 D  NA   NA  4  
 E  NA   NA  5

E eu gostaria de obter

 'a' 'mycol'  
  A   1  
  B   2  
  C   3  
  D   4  
  E   5  

Os nomes das colunas que contêm NA mudam dependendo do código anterior da consulta, portanto, não posso chamar os nomes das colunas explicitamente, mas tenho os nomes das colunas que contêm NAs armazenados como um vetor, por exemplo. neste exemplocols <- c('x','y','z'), então poderia chamar as colunas usandodata[, cols].

Qualquer ajuda seria apreciada.

obrigado

questionAnswers(8)

yourAnswerToTheQuestion