基于R语言的支持向量机（SVM）+k均值（K-means）简单实现