R é funcional? (2)

Uma possível implementação da função interpret() foi fornecida para você. Neste exercício, você escreverá outra função que usará a função interpret() para interpretar todos os dados das visualizações diárias de perfil em um vetor. Além disso, sua função retornará a soma das visualizações em dias populares, se solicitado. Um loop for é ideal para iterar sobre todos os elementos do vetor. A capacidade de retornar a soma das visualizações em dias populares é algo que você pode codificar por meio de um argumento de função com um valor padrão.

Este exercício faz parte do curso

R intermediário

Ver Curso

Instruções de exercício

Conclua o modelo para a função interpret_all():

Torne return_sum um argumento opcional, que é TRUE por padrão.
Dentro do loop for, itere sobre todos os views: em cada iteração, adicione o resultado de interpret(v) a count. Lembre-se de que interpret(v) retorna v para dias populares e 0 para outros dias. Ao mesmo tempo, o interpret(v) também fará algumas impressões.
Termine a construção do if:
Se return_sum for TRUE, você retornará count.
Caso contrário, retorne NULL.

Chame essa nova função definida em linkedin e facebook.

Exercício interativo prático

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

# The linkedin and facebook vectors have already been created for you
linkedin <- c(16, 9, 13, 5, 2, 17, 14)
facebook <- c(17, 7, 5, 16, 8, 13, 14)

# The interpret() can be used inside interpret_all()
interpret <- function(num_views) {
  if (num_views > 15) {
    print("You're popular!")
    return(num_views)
  } else {
    print("Try to be more visible!")
    return(0)
  }
}

# Define the interpret_all() function
# views: vector with data to interpret
# return_sum: return total number of views on popular days?
interpret_all <- function(views, return_sum) {
  count <- 0

  for (v in views) {

  }

  if (return_sum) {

  } else {

  }
}

# Call the interpret_all() function on both linkedin and facebook

Editar e executar código