复习：用户名生成器

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

挑战

中等

完成 make_username(full_name, year)，以生成用户名：

获取姓名中的各个单词。单词之间或姓名前后可能有多余的空格。
取第一个单词的首字母和最后一个单词的完整内容，并转换为小写。
从结果中删除所有 - 和 '。
添加 year 的最后两位数字。

对于 Ada Lovelace 和 1815，用户名是 alovelace15。函数返回两行：Username: 后面跟用户名，Length: 后面跟用户名的字符数。

提供的代码会读取姓名和年份，并将返回的每一行分别打印在单独的一行上。

亲手试试

make_username <- function(full_name, year) {
  # 在这里编写你的代码
  c("Username: ", "Length: 0")
}

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