读懂代码项目需求

我曾经的同门 Sam Tyner 在推特上问是否存在一个把名字转换为 Tidyverse 命名风格的包名的工具。有开玩笑性质，不过我瞅了一眼，觉得这倒是一个不错的读懂代码项目需求的例子。根据上下文以及过往经验，这个包名应该满足如下条件：

1. 纯小写；

2. 只能用五个字母；

3. 必须以 r 结尾；

4. 如果字母数不够五个，那么在尾巴上接一串 r。

这些条件并没有在对话中全列出来，只有 2 是显式说明过的。最后我给的答案是：

tidy_name = function(x) {
  x = tolower(substr(abbreviate(x), 1, 4))
  paste(c(x, rep('r', 5 - nchar(x))), collapse = '')
}

举例：

tidy_name('Sam Tyner')
# [1] "smtyr"
tidy_name('Hadley')
# [1] "hdlyr"
tidy_name('Yihui Xie')
# [1] "yihxr"

四个条件，四行代码¹。这里面自以为比较厉害的是 abbreviate() 函数，这大概是没多少人知道的。我以前说过，写代码调函数如写诗词用典，好处在于精简、效率高，坏处在于需要了解更多函数（典故），而且可能会让读者费解。

赞赏

作为一名没有固定工作的自由职业者，我非常感谢您通过捐赠的方式来支持我的写作和开源软件开发。当然，捐赠纯属自愿。无论金额多少，都是一片诚挚的心意。支付方式如下：

微信	← 奋力支开它俩 →	支付宝
	其它爱心通道 ↓ Venmo: @yihui_xie Zelle: xie@yihui.name PayPal: xie@yihui.name

若使用 Venmo/Zelle/Paypal，请添加备注“gift”或“donation”，以免捐赠被视为我的可税收入。若使用 Paypal，支付类型请选 Family and Friends，而不要选 Goods and Services。

在不影响生活的前提下，我会将收到的捐赠以尽量大的比例回馈给开源社区和慈善机构。作为参考，2024-25 年间我共收到约三万美元捐赠，完税后我转手捐出了一万五千美元。