Как сделать интерактивные метки точек данных в R studio? - PullRequest
Новая
       25

Как сделать интерактивные метки точек данных в R studio?

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")
...