How to show all text in this ternary plot?

Question

I have made a ternary plot like this but I cannot see all labels in this plot. What should I do?

Here is my code

tern <- ggtern(data = Triangle2, aes(x = Bulk.soil, y = Rhizosphere.soil, z = Root)) +
  geom_text(aes(label=row.names(Triangle2)), color='black',size=3, check_overlap = FALSE)+
geom_point(aes(size = Relative_abundance,
shape = Shape,
colour = Root_specific),alpha=0.8) +
scale_shape_manual(values = c(19, 19)) +
scale_size_area(max_size = 7,breaks=c(1,10)) +
scale_colour_gradient(low = '#f8766d', high = '#00ba38') +
theme_bw() + theme_showarrows() + theme_nogrid() +
theme(tern.axis.text=element_text(colour="black"),legend.position      = "bottom",
legend.box.just      = 'left')+
guides(shape= "none",
size = guide_legend(order   =2),
colour = "none") +
labs(size = 'Relativeabundance (%)')+labs(x="Bulk", y = "Rhizosphere", z = "Root")+theme(legend.title=element_text(size=10),legend.position = c(0.75,0.75),legend.key=element_blank())+guides(size=guide_legend(override.aes=list(colour="darkgrey")))

Thank you so much!