回顾：折扣规则

本课属于 Coddy R 学习旅程的“逻辑与流程”单元。第 31 课，共 64 课。

挑战

中等

商店会依次对价格应用定价规则。请用以下针对单个价格的匿名函数补全列表 rules：

half：将价格除以 2
minus5：减去 5，但结果不能低于 0
tax：加上 10%
round：用 round() 将价格四舍五入为整数

然后补全 apply_rules(price, names)：按顺序应用 names 中指定的规则，并为每条规则返回一行，after half: 20.00，后面接着 final: 和最终价格。每个价格都显示两位小数。

提供的代码会读取价格和以逗号分隔的规则名称列表，并打印返回的每一行。

亲手试试

rules <- list(
  # 在这里编写你的代码
)

apply_rules <- function(price, names) {
  # 在这里编写你的代码
  character(0)
}

# 提供的输入和输出代码：保持原样
input <- suppressWarnings(readLines(file("stdin")))
cat(apply_rules(as.numeric(input[1]), strsplit(input[2], ",")[[1]]), sep = "\n")

逻辑与流程中的所有课

3集合与计数

唯一值集合运算成员测试使用 table() 计数回顾：活动宾客

6函数作为值

匿名函数传递函数返回函数带状态的闭包回顾：折扣规则

9数据框

创建数据框列和行筛选行添加和排序回顾：销售报告

12项目：支出追踪器

自己练习： R 在线编译器