Как сделать интерактивные метки точек данных в R studio? - PullRequest
0 голосов
/ 03 апреля 2019

У меня есть график NMDS, наложенный на оценки PCA. У меня есть 45 векторов PCA, каждый из которых является видом животного.

Проблема в том, что метки моих стрелок (названия животных) накладываются друг на друга. Мне было интересно, есть ли способ сделать график интерактивным, чтобы можно было навести курсор на один из векторов PCA (красная стрелка), чтобы появилось имя животного?

Вот код, который я использовал для построения графика:

Показать сайты по решению NMDS

new.solved.NMDS<-metaMDS(new.solved, distance = "jaccard", k = 4, trymax = 2000, autotransform=FALSE)

plot.new.solved<-data.frame(new.solved.NMDS$points)

par(mar=c(3,3,2,5) ,mgp=c(1.8,0.75,0))

сайты:

plot(plot.new.solved$MDS1, plot.new.solved$MDS2, pch=16, cex=1, col="black",xlab="NMDS1", ylab="NMDS2", cex.lab=1, cex.axis=1, main="", bty="L", mai=c(0,0,2,10),xlim=c(-1.5,1.3),ylim=c(-0.9,1)) 

векторы PCA (а не NMDS), наложенные на NMDS Рассчитывает виды видов

fit <- envfit(new.solved.NMDS, new.solved, choices=c(1,2,3)) 

добавляет векторы видов на участок NMDS

fit.plot=plot(fit,cex=1.3,col="red",xlim=c(-1.5,1.3),ylim=c(-1.2,1.2), xlab="NMDS1",ylab="NMDS2")
...