代码之家 › 专栏 › 技术社区 › JasonAizkalns

当变量具有嵌入空间时,如何在R中使用重新格式化

JasonAizkalns · 技术社区 · 6 年前

需要使用什么样的正确字符串解析 reformulate()

这项工作:

reformulate(c("A", "B"), "Y")
Y ~ A + B

这些都失败了:

reformulate(c("A var", "B"), "Y")
reformulate(quote(c("A var", "B")), "Y")
reformulate(as.formula(quote(c("A var", "B"))), "Y")

预期成果:

Y ~ `A var` + B
# or 
Y ~ `A var` + `B`

笔记
我不能硬编码反勾号。这是一个更大的闪亮应用程序的一部分,因此,如果backticks是答案,那么我需要一个方法以编程方式实现这一点。

1 回复 | 直到 6 年前

moodymudskipper 6 年前

这里有一些处理符号而不是字符串的其他方法(因此不需要显式反勾号)。

input <- "A var"
eval(bquote( Y ~ .(as.name(input)) + B))
# Y ~ `A var` + B

eval(substitute( Y ~ INPUT + B, list(INPUT = as.name(input))))
# Y ~ `A var` + B

library(rlang)
eval(expr(Y ~ !!sym(input) + B))
# Y ~ `A var` + B

Maurits Evers 6 年前

使用反勾号,例如。

reformulate(c("`A var`", "B"), "Y")
#Y ~ `A var` + B

或者更好的是,不要在变量名中使用空格。

或者使用辅助函数

bt <- function(x) sprintf("`%s`", x)
reformulate(c(bt(var1), var2), "Y")
#Y ~ `A var` + B

推荐文章

Amp · 使用R ggplot2删除geom_radial中axis.line和panel.border之间的空格

11 月前

Hard_Course · 用另一列中的值替换行的最后一个非NA条目

11 月前

Mark R · 使用geom_sf()删除地球仪上不需要的网格线

11 月前

Joe · 根据对工作日和本周早些时候的日期的了解,找到一个日期

11 月前

Ben · 统计向量中的单词在字符串中出现的频率

11 月前

TheCodeNovice · R中符号格式的尾随零和其他问题[重复]

11 月前

katefull06 · 在R中使用terra修改范围时,会为单独的SpatRaster重写范围

11 月前

dez93_2000 · 在R管道子功能中引用管道对象的当前状态

11 月前

accibio · 在ggplot2中为同一变量创建两个连续的颜色渐变比例

12 月前

Mankka · 如何在Ggplot2中绘制均匀的径向图

1 年前