Я новичок в форуме, и я только начал писать код на R. Можете ли вы, ребята, помочь мне с проблемой ниже?
Мои данные (в Excel):
''' GEN DIAt AFVm Ead lim Eme Axim Aflom EC CT PC EP EN AF PF
A-CO 3275 11794. 22.2 83.3 4363. 1172. 300 1042371. 0.773 13.6 9.34 217293. 0.207
A-HE 3712. 17433. 22.3 95.8 5183. 1371. 323. 1165171. 0.780 13.5 9.69 231856. 0.199
A-HO 3896. 19237. 25.6 95.8 5388. 1499. 329. 1336731. 0.756 15.1 8.68 284952. 0.213
B-HE 4862. 33016. 23.8 87.5 6343. 2206. 327. 1313169. 0.762 10.1 9.12 239546. 0.192
B-HO 3679. 21625. 27.1 83.3 4432. 1432. 342. 1208777. 0.796 12.4 10.7 214757. 0.183
C-HE 3200 13179. 25.5 75 5971. 2058. 281. 838249. 0.792 13.1 7.34 159370. 0.190
C-HO 4325 23120. 26.8 95.8 8108. 2292. 390. 1786944. 0.779 12.3 9.26 310232. 0.175
D-HE 2642. 7765. 25.5 75 5182. 1648. 269. 923988. 0.747 9.56 8.65 216639. 0.233
D-HO 3354. 21970. 22.5 75 4718. 1508. 252. 894863. 0.746 12.2 8.75 185305. 0.224
E-HE 3308. 11223. 23.0 79.2 5268. 1461. 335. 1223176. 0.793 10.9 8.43 224411. 0.176
E-HO 2579. 5765. 23.7 75 5082. 1583. 346. 1228985. 0.799 14.3 9.57 216148. 0.177
и мой код:
require(FactoMineR)
require(factoextra)
c1 <- media_PCA
c1
res.pca <- PCA(c1[1:11, 2:14], graph = F, scale = TRUE)
eig.val <- get_eigenvalue(resp)
eig.val
var <- get_pca_var(resp)
ind <- get_pca_ind(resp)
fviz_pca_var(res.pca, col.var = "blue")
grupo <- as.factor(media_PCA$GEN)
pca <- fviz_pca_biplot(res.pca, habillage = grupo)
pca
Моя проблема заключается в построении графика, потому что он не идентифицирует первый столбец данных как имя данных, потому что его текстовый тип. Вместо этого метки отдельных лиц отображаются в виде цифр, а не имени данных.
Как видно на картинке ниже:
введите описание изображения здесь
Не могли бы вы, ребята, объяснить, что я делаю не так?
Большое спасибо.