Skip to content

Commit

Permalink
print.MDSaddpoints still missing, but have shorter output in Examples
Browse files Browse the repository at this point in the history
  • Loading branch information
jarioksa committed May 17, 2024
1 parent 99ff6e3 commit eabf8e3
Show file tree
Hide file tree
Showing 2 changed files with 63 additions and 437 deletions.
4 changes: 2 additions & 2 deletions man/MDSaddpoints.Rd
Original file line number Diff line number Diff line change
Expand Up @@ -84,9 +84,9 @@ d <- vegdist(dune)
## remove point 3 from ordination
mod3 <- metaMDS(dist2xy(d, 3, "xx", invert = TRUE), trace=0)
## add point 3 to the result
MDSaddpoints(mod3, dist2xy(d, 3))
str(MDSaddpoints(mod3, dist2xy(d, 3)))
## Use designdist2
d15 <- designdist(dune[1:15,])
m15 <- metaMDS(d15, trace=0)
MDSaddpoints(m15, designdist2(dune[1:15,], dune[16:20,]))
str(MDSaddpoints(m15, designdist2(dune[1:15,], dune[16:20,])))
}
Loading

0 comments on commit eabf8e3

Please sign in to comment.