• ep 代表肺外结核病例。
• sn 代表无法通过肺部涂片诊断的肺结核病例（涂片阴性）。
• sp 代表可以通过肺部涂片诊断的肺结核病例（涂片阳性）。
• 3. 第六个字母表示结核病患者的性别。数据集按男性（m）和女性（f）对病例进行分组。
• 4. 其余数字表示年龄组。数据集将病例分为七个年龄组：
  • 014 = 0–14 岁
  • 1524 = 15–24 岁
  • 2534 = 25–34 岁
  • 3544 = 35–44 岁
  • 4554 = 45–54 岁
  • 5564 = 55–64 岁
  • 65 = 65 岁及以上

我们需要对列名的格式做一个小修正：遗憾的是，这些名称稍微有些不一致，因为这里不是 new_rel 而是 newrel（在这里很难发现，但如果不修正，后续步骤会报错）。你将在第 11 章学习 str_replace()，但基本思路非常简单：把字符 "newrel" 替换为 "new_rel"。这样所有变量名就保持一致了：

who2 <- who1 %>% mutate(key = stringr::str_replace(key, "newrel", "new_rel")) who2 #> # A tibble: 76,046 × 6 #> country iso2 iso3 year key cases #> #> 1 Afghanistan AF AFG 1997 new_sp_m014 0 #> 2 Afghanistan AF AFG 1998 new_sp_m014 30 #> 3 Afghanistan AF AFG 1999 new_sp_m014 8 #> 4 Afghanistan AF AFG 2000 new_sp_m014 52 #> 5 Afghanistan AF AFG 2001 new_sp_m014 129 #> 6 Afghanistan AF AFG 2002 new_sp_m014 90 #> # ... with 7.604e+04 more rows