2

Preciso verificar se existem colunas (ou seja variáveis) dentro de um data.frame antes de fazer qualquer operação, porém a variável passada não está em string para comparar com o colnames ou names.

Segue o código:

check_measurement_ages = function(data_base,measurement_variable1,measurement_variable2){
  if(measurement_variable1 %in% names(data_base)){
}
1
  • Não entendi. Tua pergunta ficou ambígua para mim. Tu precisa verificar se existe alguma coluna (alguma no sentido de qualquer uma) no data frame ou precisa procurar uma coluna específica? Se for uma coluna específica, como identificá-la? O que ela tem de especial para diferenciá-la das outras colunas que porventura existem neste data frame? 27/09/2016 às 10:55

1 Resposta 1

1

Seu problema é relacionado a non-standard evaluation.

O menor exemplo possível de fazer isso é:

verificar_coluna <- function(data, coluna){
  coluna_texto <- deparse(substitute(coluna))
  coluna_texto %in% names(data)
}

> verificar_coluna(mtcars, mpg)
[1] TRUE

A função substitute captura a expressão digitada pelo usuário, e a função deparse a transforma em string.

O problema dessa abordagem é se a tua função for chamada por dentro de uma outra:

verificar_coluna2 <- function(data, coluna){
  verificar_coluna(data, coluna)
}

> verificar_coluna2(mtcars, mpg)
[1] FALSE

Por isso uma abordagem mais segura é proposta pelo pacote lazyeval. A vignette dele é bem explicativa.

Na prática, é melhor escrever uma função:

verificar_coluna <- function(data, coluna){
  coluna_texto <- lazyeval::expr_text(coluna)
  coluna_texto %in% names(data)
}

Assim as duas funções irão funcioanr.

> verificar_coluna(mtcars, mpg)
[1] TRUE
> verificar_coluna2(mtcars, mpg)
[1] TRUE

Você deve fazer log-in para responder a esta pergunta.

Esta não é a resposta que você está procurando? Pesquise outras perguntas com a tag .