R: subset()返回等价逻辑表达式的不同结果

Question

在为subset()编写便利函数时，我遇到了一种奇怪的情况，即使用等价的逻辑语句返回不同的子集。所以，举个例子：

dat = data.frame(ttl.stims = c(4,4,8,8), change = c('big', 'small'))
dat
ttl.stims = 4

#logical statements are equivalent
dat$ttl.stims == 4
dat$ttl.stims == ttl.stims

#subset evaluates differently
subset(dat, dat$ttl.stims == 4)
subset(dat, dat$ttl.stims == ttl.stims)

我一直在通过做以下工作来解决这个问题：

index = dat$ttl.stims == ttl.stims
subset(dat, index)

但是我很好奇为什么前两个子集不能产生相同的结果！想法？有什么想法？公告？

Answer 1

因为在对subset的调用中，符号ttl.stims在dat的环境中被解释，所以它(在解释之后)变成了dat$ttl.stims。我预测对subset的第二次调用将返回整个数据帧。