Usar o lapply com argumentos adicionais

No vídeo, a função triple() foi transformada na função multiply() para permitir uma abordagem mais genérica. lapply() fornece uma maneira de lidar com funções que exigem mais de um argumento, como a função multiply():

multiply <- function(x, factor) {

  x * factor

}
lapply(list(1,2,3), multiply, factor = 3)

À direita, incluímos uma versão genérica das funções de seleção que você programou anteriormente: select_el(). Ela recebe um vetor como seu primeiro argumento e um índice como seu segundo argumento. Ela retorna o elemento do vetor no índice especificado.

Este exercício faz parte do curso

R intermediário

Ver Curso

Instruções de exercício

Use lapply() duas vezes para chamar select_el() sobre todos os elementos em split_low: uma vez com index igual a 1 e uma segunda vez com o índice igual a 2. Atribua o resultado a names e years, respectivamente.

Exercício interativo prático

Experimente este exercício preenchendo este código de exemplo.

# Definition of split_low
pioneers <- c("GAUSS:1777", "BAYES:1702", "PASCAL:1623", "PEARSON:1857")
split <- strsplit(pioneers, split = ":")
split_low <- lapply(split, tolower)

# Generic select function
select_el <- function(x, index) {
  x[index]
}

# Use lapply() twice on split_low: names and years