R语言作业wine 数据

目标：
创建一个模型， 去预测三种wine的类型
1.数据集介绍
78种意大利葡萄酒中13种化学成分的数据集。该数据最初 来自于UCI机器学习库（http://www.ics.uci.edu/~mlearn/MLRepository.html），但是可以通过rattle 包获得。在这个数据集里，观测值代表三种葡萄酒的品种，由第一个变量（类型）表示

data(wine, package="rattle")
1

检查类别平衡

prop.table(table(wine$Type))
##         1         2         3 
## 0.3314607 0.3988764 0.2696629
barplot(t
1
2
3