问如何转换这个旧的dplyr语法？

EN

我对dplyr很陌生，我在以下方面遇到了困难：(i)理解它的语法，(ii)将它的旧版本代码转换为我可以在其最新版本(dplyr 1.0.2)中使用的代码。特别是，我对以下两行代码感到困惑：

mutate_each(funs(replace(.,.=="NOT ANSWERED",NA))) %>%     
mutate_each(funs(ordered(.,c("NOT AT ALL","ONCE A WEEK", "2-4 TIMES PER WEEK/HALF THE TIME", "5 OR MORE TIMES PER WEEK/ALMOST ALWAYS"))))

我认为第一行代码应该用NA替换所有“未回答”。

您认为下面的转换是接近的吗？

mutate(across(everything(),~replace(., .== "NOT ANSWERED", NA)))

但是，我不明白第二行代码是关于什么的。我相信，这是关于创建某种有序变量，以"NOT AT“、”一周一次“、”每周2-4次/一半时间“和”每周5次或更多次/几乎总是“作为级别。

您对这一行做了什么，以及如何将它转换成新语法(跨())有什么建议吗？

一些上下文

我正在学习如何使用Bootnet包的教程。以下文本来自本教程的第一部分

要下载数据集，请转到：https://datashare.nida.nih.gov/study/nida-ctn-0015并单击“CTN-0015数据文件”。相关的数据文件称为“qs.csv”，可以使用默认的read.csv函数将其加载到R中： FullData <- read.csv("qs.csv"，stringsAsFactors = FALSE) 这将以长格式加载数据，其中包含带有subject id的列、带有受管理项名称的列和包含项响应的第三列。对于网络分析，我们需要数据是宽格式的。此外，我们需要指定响应“未回答”表示缺少响应，其他响应是顺序的。最后，我们需要提取相关的数据集在基线测量的PTSD症状频度评分。为此，我们可以使用dplyr和tidyr包如下:Load包:库(“dplyr”)库(“tidyr”)基线处的频率: Data <- FullData %>% filter(划时代的==“基准”)，grepl("^PSSR\d+A$"，QSTESTCD) %>% select(USUBJID，QSTEST，QSORRES) %>% and (QSTEST，QSORRES)%>%and(QSTEST，QSORRES)%>% select(-USUBJID) %mutate_each(mutate_each(替换(.，.=="NOT“，NA)) %>% mutate_each(ordered(.，c("NOT”，“每周一次”，“每周2-4次/一半时间”)名称(数据)(数据) <- seq_len(数据)

本教程继续在其第二部分中进行。