various fixes in C files

[ape.git] / man / rotate.Rd

diff --git a/man/rotate.Rd b/man/rotate.Rd
index 563122efa98228b37daf00a2e9e7b20f33076aae..f6ad0fe658a30e4b049d5e4234cc624aa6bed238 100644 (file)
--- a/man/rotate.Rd
+++ b/man/rotate.Rd
@@ -1,8 +1,8 @@
 \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 swopping.}
+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{
 rotate(phy, node, polytom = c(1, 2))
 }
@@ -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