ggplot(plotdata, aes(MDS1, MDS2)) +
geom_point(aes(colour=group1,fill=group1),size=5)+
labs(title="") + xlab(paste("MDS1")) +
ylab(paste("MDS2"))+
theme(text=element_text(size=14))+
geom_vline(aes(xintercept = 0),linetype="dotted")+
geom_hline(aes(yintercept = 0),linetype="dotted")+
geom_text(aes(x=max(MDS1),y=max(MDS2)),hjust=-0.5,vjust=-5,
family="TNM", size=6, label=paste("Stress = ", round(nmds_dis$stress,3), sep = ""),
fontface="plain", colour="black")+
stat_ellipse(aes(fill = group),geom = "polygon",
level = 0.95,alpha = 0.3)+
geom_label_repel(aes(MDS1, MDS2, label = ""),
fill = "white",color = "black",
box.padding = unit(0.6,"lines"),segment.colour = "grey50",
label.padding = unit(0.2,"lines"))+
theme(panel.background = element_rect(fill='white', colour='black'),
panel.grid=element_blank(),
axis.title = element_text(family="TNM", color='black',size=18),
axis.ticks.length = unit(0.4,"lines"),
axis.ticks = element_line(color='black'),
axis.line = element_line(colour = "black"),
axis.title.x=element_text(family="TNM", colour='black', size=18),
axis.title.y=element_text(family="TNM", colour='black', size=18),
axis.text=element_text(family="TNM", colour='black',size=18),
legend.title=element_blank(),
legend.text=element_text(family="TNM", size=18),
legend.justification = "top" ,
legend.key=element_blank())+
theme(plot.title = element_text(family="TNM",size=18,colour = "black",face = "plain"))
使用R绘制NMDS图时报错
Error in FUN(X[[i]], ...) : object 'group' not found
请问如何解决，谢谢