R怎么确定系统聚类中分类个数？ 求R方等统计量的程序？

有代码或者包来实现求R方、半偏R方、伪F等统计量的吗？ sas里的过程直接会得到这些值，R里有代码或者包来求这些统计量吗？图片说明

http://www.52ml.net/8663.html