用R完成SVM和ANN模型预测并评估
SVM和ANN就早有耳闻了，无奈R里面的轮子真是乱。难得最近有心情了，利用空余时间把这个项目重新用caret撸一遍。
数据预处理
这个数据长这个蛋样的（str()的结果）：
Classes ‘data.table’ and 'data.frame': 164 obs. of 18 variables:
$ SampleID: int 10086901 10086902 10086924 10086934 10042716 10042715 10042718 10042719 10042732 10042733 ...
$ PEDF : int 107635 136455 130085 106695 110565 131440 83305 178960 579090 117355 ...
$ SP-B : num 61.4 61.4 61.4 928.2 558 ...
$ Galectin: num 67.1 85.7 124 94.2 69.8 ...
$ FTL : num 1327 750 2065 1914 1563 ...
$ AKAP4 : num 2701 2286 2147 2640 885 ...
$ LUM : num 109 0 83.3 92.7 56.7 ...
$ COL : num 1469 864 1012 1644 1104 ...
$ MASP1 : int 282690 409725 240220 523840 245555 139960 15405 632280 2198900 440850 ...
$ ITG-b1 : num 257 185 255 462 186 ...
$ PTPRJ : num 351.5 328.9 446.9 41.2 417.3 ...
$ Gelsolin: num 1273 798 758 864 665 ...
$ TSP-1 : num 463900 216520 191805 256615 222151 ...
$ ZYX : num 502 439 541 664 204 ...
$ CD163 : num 40.8 46.8 43.3 58.6 59.3 ...
$ FDA : num 186 164 152 288 233 ...
$ PC : num 528 335 321 337 244 ...
$ Status : int 0 0 0 1 1 1 1 1 1 1 ...
- attr(*, ".internal.selfref")=<externalptr>