Skip to main content

Browse the archive

https://github.com/meglab2017/The-microbial-biosphere-of-the-coral-Acropora-cervicornis-in-Northeastern-Puerto-Rico
05 April 2024, 20:44:24 UTC
Revision acf5851080b5159b1e19b3afd81d9782f203f9b4 authored by meglab2017 on 15 August 2017, 02:21:33 UTC, committed by GitHub on 15 August 2017, 02:21:33 UTC 
Update README.md
1 parent 6ecc1f9
Raw File
Tip revision: acf5851080b5159b1e19b3afd81d9782f203f9b4 authored by meglab2017 on 15 August 2017, 02:21:33 UTC
Update README.md
Tip revision: acf5851
nmds-for-fig2B.R 
library(vegan)

data= read.csv("38distmatrix.csv", header=TRUE, row.names=1)

meta = read.table("metacoral.txt", sep="\t", row.names=1, header=T)

metaMDS_coral = metaMDS(t(data), autotransform = F)

pdf(file ="nmds_coral-depth.pdf")

plot(metaMDS_coral$points, pch=meta$coral, col=meta$depth,lwd=5, main="NMDS by coral depth”, cex.lab = 1.2, cex.axis = 1.2, cex.main =1.2 ,xlab="Axis 1", ylab="Axis 2")

text(metaMDS_coral$points, labels = rownames(meta), pos=1, cex=0.5)

metaMDS_coral$stress

dev.off()
back to top