将TRUE和FALSE更改为是和否

Question

我有以下R脚本:

x <- c('PE', 'MG', 'SP', 'GO', 'ES', 'PB', 'DF')
y <- c('PB', 'MG', 'SP', 'GO', 'ES', 'SE', 'DF')
z <- x == y

以便

> z
[1] FALSE  TRUE  TRUE  TRUE  TRUE FALSE  TRUE

但是,我希望z(以及脚本中的其他逻辑变量)显示"是"和"否",所以我执行此重新编码:

z <- ifelse(z == TRUE, "Yes", "No")

有没有办法跳过这个额外的步骤,即定义zshow"Yes"而不是"TRUE"和"No"而不是"FALSE".

当然,我也可以这样做z <- ifelse(x == y, "Yes", "No"),但我仍然在寻找类似于options()我可以定义一次的函数内部的参数,并让它工作到脚本结束(或直到我重新定义参数).找不到类似的东西?options.

Answer 1

据我所知,没有办法覆盖R打印TRUE和FALSE逻辑对象的事实(我个人觉得这很好).

您正在寻找的最接近的解决方案可能是因子转换:

z <- factor(x==y, labels=c("No", "Yes"))

> z
[1] No  Yes Yes Yes Yes No  Yes
Levels: No Yes

Answer 2

另一种方法:

c('No', 'Yes')[z + 1]