19.2 判别分析及R实例