all.equal（）在R基本沒有返回TRUE

Question

我不知道爲什麼all.equal()不適用於下列數據返回TRUE：

Like.prob = dbinom(x = 0:2, size = 2, prob = .7) 
sim.obs = rbinom(n = 1e6, size = 2, prob = .7) 

sim.Like.prob = unname(table(sim.obs)/1e6)[1:3] 

all.equal(Like.prob, sim.Like.prob, tolerance = .01) ## Here I expect a TRUE 

Answer 1

只要確保兩個元素具有相同的類比較之前：

class(Like.prob) 
class(sim.Like.prob) 
all.equal(Like.prob, as.numeric(sim.Like.prob), tolerance = .01)