如何确定引用类的对象类型

Question

我有不同类型的引用类的对象列表。如何确定以下类的类型？我应该使用函数class吗？

A<-setRefClass(Class = "A", fields = c(var1 = "ANY"))
a<-A(var1=1)
class(a)=="A"
b<-list(A(var1=1),A(var1=1))
lapply(b, function(x) class(x)=="A")