R you functional? (2)

我们已为您提供了 interpret() 函数的一个可行实现。本练习中，您将编写另一个函数，利用 interpret() 来解释向量中您每日主页浏览量的所有数据。此外，在需要时，您的函数还将返回热门日的浏览量总和。对于遍历向量的所有元素，for 循环非常合适。是否返回热门日浏览量总和，可以通过带有默认值的函数参数来实现。

本练习是课程的一部分

R 中级

查看课程

练习说明

完成 interpret_all() 函数模板：

将 return_sum 设为可选参数，默认值为 TRUE。
在 for 循环中遍历所有 views：每次迭代都将 interpret(v) 的结果加到 count 上。请记住，interpret(v) 在热门日返回 v，否则返回 0。同时，interpret(v) 也会打印一些信息。
完成 if 结构：
如果 return_sum 为 TRUE，返回 count。
否则，返回 NULL。

对 linkedin 和 facebook 都调用这个新定义的函数。

交互式实操练习

通过完成这段示例代码来试试这个练习。

# 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

编辑并运行代码