请教一个问题：
在S4中，如果来判断一个对象是否属于特定子类？
举例：比如对象testObj属于类‘classSon’，‘classSon’又是类’classFather’的子类。
is(testObj, 'classSon')返回结果TRUE，is(testObj, 'classFather')也返回结果TRUE。
所以，问题：是否有一个函数只检测testObj所属的特定子类，而不包括其父类。即，函数检测testObj是否属于‘classSon’时，返回结果TRUE；而检测testObj是否属于‘classFather’时，则返回FALSE。
谢谢～～