final commit for ape 3.0

[ape.git] / man / rotate.Rd

diff --git a/man/rotate.Rd b/man/rotate.Rd
index 13fed062b35f910525cdcc33204ed76f3b32d7c4..f6ad0fe658a30e4b049d5e4234cc624aa6bed238 100644 (file)
--- a/man/rotate.Rd
+++ b/man/rotate.Rd
@@ -1,6 +1,6 @@
 \name{rotate}
 \alias{rotate}
-\title{Swopping sister clades}
+\title{Swapping sister clades}
 \description{
 For a given node, rotate exchanges the position of two clades descending from this node. It can handle dichotomies as well as polytomies. In the latter case, two clades from the polytomy are selected for swapping.}
 \usage{
@@ -39,13 +39,11 @@ nodelabels()
 tre.new <- rotate(tre, 30)
 
 # compare the results:
-X11() # open new graphical device
-par(mfrow=c(1,2)) # devide graphical device
+par(mfrow=c(1,2)) # split graphical device
 plot(tre) # plot old tre
 plot(tre.new) # plot new tree
 
 # visualize labels of terminal nodes:
-X11() # open new graphical device
 plot.phylo(tre)
 tiplabels()
 
@@ -53,8 +51,7 @@ tiplabels()
 tre.new <- rotate(tre, c(12, 21))
 
 # compare the results:
-X11() # open new graphical device
-par(mfrow=c(1,2)) # devide graphical device
+par(mfrow=c(1,2)) # split graphical device
 plot(tre) # plot old tre
 plot(tre.new) # plot new tree
 
@@ -62,7 +59,6 @@ plot(tre.new) # plot new tree
 tre.new <- rotate(tre, c("t3", "t14"))
 
 # compare the results:
-X11() # open new graphical device
 par(mfrow=c(1,2)) # devide graphical device
 plot(tre) # plot old tre
 plot(tre.new) # plot new tree