R语言如何通过PCA与PCR回归可视化预测汽车购买行为?