Labelling only certain taxa of interest about netcomi HOT 1 CLOSED

# Store plot object
p <- plot(props_genus,
     repulsion = 0.84,
     shortenLabels = "none",
     labelScale = FALSE,
     rmSingles = FALSE, #important to not remove singles here
     doPlot = FALSE)

# Store labels vector and assign taxa labels
labs <- p$labels$labels1
names(labs) <- colnames(net_genus$adjaMat1)

# Remove certain labels
labs[1:20] <- ""

# Plot with predefined labels
plot(props_genus,
     labels = labs,
     repulsion = 0.84,
     shortenLabels = "none",
     labelScale = FALSE,
     rmSingles = TRUE)