在以下数据中，两个变量的水平均以数字编码
dat = read.csv("https://studio.edx.org/c4x/HarvardX/PH525.1x/asset/assoctest.csv")
head(dat)
我将这些代码替换为字符串，以便于阅读和绘图。我可以使用 dplyr mutate 函数成功完成此操作。
dat_char = mutate(dat, allele=replace(allele, allele==0, "AA/Aa")) %>%
mutate(allele=replace(allele, allele==1, "aa")) %>%
mutate(case=replace(case, case==0, "control")) %>%
mutate(case=replace(case, case==1, "case"))
上面的代码工作得很好，但是它是重复的并且写起来很繁琐。我确信有一种方法可以同时执行其中一些替换并精简代码，但我不确定如何进行。例如，我尝试使用向量作为查找和替换值。
dat_char = mutate(dat, allele=replace(allele, allele==c(0,1), c("AA/Aa", "aa"))) %>%
mutate(case=replace(case, case==c(0,1), c("control", "case")))
head(dat_char)
这只会让事情变得一团糟，但它让我明白了我想要实现的目标。
我正在尝试修改qgraph()r包qgraph中的函数，以对图形参数进行一些大的更改。但是在尝试进行这些修改之前，我已经访问了该函数的源代码，并将其重新加载为新函数（即qgraph2()），并在big5示例数据上运行它。我收到的错误读取could not find function "getArgs"，我怀疑getArgs是隐藏的函数。但是，我无法在qgraph环境或r全局环境中找到getArgs（），也无法在任何r文档中找到它的任何记录（?getArgs，??getArgs），所以我不知道从哪里调用它或如何找到该信息。此外，我怀疑在qgraph（）函数中还有更多隐藏函数。所以我的问题有两个方面：首先，如何找出getArgs（）的隐藏位置并相应地对其进行访问，其次，有没有办法允许我的修改函数qgraph2访问所有这些隐藏的对象而无需单独调用它们。谢谢。