data <-data.frame(i.1=c(rep(6,5)),i.2=c(6,7,7,7,8),j.1=c(11,11,11,13,9),j.2=c(11,11,12,13,9),freq=c(0.1,0.2,0.5,0.1,0.1))
i.1 i.2 j.1 j.2 freq
1 6 6 11 11 0.1
2 6 7 11 11 0.2
3 6 7 11 12 0.5
4 6 7 13 13 0.1
5 6 8 9 9 0.1
p1 <- data[data[,1] == 6 & data[,2] == 6 & data[,3] == 7 & data[,4] == 7,]$freq
p1 - 5 不等于 -5,因为 p1 不是零,而是数字(0)。
在这种情况下,是否定义了 p1?
exists("p1")
[1] TRUE
我怎样才能使它等于零?