Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/83.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
使用ordiplot3d为单个点添加标签？_R_Ggplot2_Vegan - Fatal编程技术网
Fatal编程技术网
  • r/
  • 使用ordiplot3d为单个点添加标签？

使用ordiplot3d为单个点添加标签？

r

使用ordiplot3d为单个点添加标签？,r,ggplot2,vegan,R,Ggplot2,Vegan,有没有办法在ordiplot3d打印中添加单个点标签？下面是使用包数据的示例 library(vegan3d) library(ggplot2) data(dune, dune.env) SITE_ID <- c("a","b","c","d","e","f","g","h","i","j"

有没有办法在ordiplot3d打印中添加单个点标签？下面是使用包数据的示例

library(vegan3d)
library(ggplot2)


data(dune, dune.env)
SITE_ID <- c("a","b","c","d","e","f","g","h","i","j","k","l","m","n","o","p","q","r","s","t")
dune.env$SITE_ID <- SITE_ID
ord <- cca(dune ~ A1 + Moisture, dune.env)
ordiplot3d(ord)
pl4 <- with(dune.env, ordiplot3d(ord, col = Management, pch=16,angle=50))
with(dune.env, ordihull(pl4, dune.env$Management, draw = "poly", col = 1:4,label=T,
                    alpha = 50))


库（vegan3d）
图书馆（GG2）
数据（沙丘，沙丘环境）
SITE_ID这应该有效


sp <- scores(pl4, choices=1:3, display="sites", scaling="symmetric")
spp <- as.data.frame(cbind(dune.env$SITE_ID,sp))
with(dune.env, ordilabel(pl4,labels=spp$V1,col="black", fill=NA, border=NA))



sp