[Picante-commits] r245 - pkg/man

noreply at r-forge.r-project.org noreply at r-forge.r-project.org
Fri May 31 21:21:13 CEST 2013


Author: skembel
Date: 2013-05-31 21:21:13 +0200 (Fri, 31 May 2013)
New Revision: 245

Modified:
   pkg/man/expected.pd.Rd
Log:
Further shortening of documentation lines to pass r-devel check cleanly

Modified: pkg/man/expected.pd.Rd
===================================================================
--- pkg/man/expected.pd.Rd	2013-05-31 18:48:07 UTC (rev 244)
+++ pkg/man/expected.pd.Rd	2013-05-31 19:21:13 UTC (rev 245)
@@ -43,11 +43,13 @@
 randtree <- rcoal(300)
 randtree.pd.ub <- variance.pd(randtree, upper.bound=TRUE)
 randtree.pd.exact <- variance.pd(randtree, upper.bound=FALSE)
-plot(expected.pd(randtree), xlab="Number of tips", ylab="Phylogenetic diversity (PD)", type="l", log="xy")
+plot(expected.pd(randtree), xlab="Number of tips",
+    ylab="Phylogenetic diversity (PD)", type="l", log="xy")
 lines(randtree.pd.exact$expected.pd+1.96*sqrt(randtree.pd.exact$variance.pd), lty=2)
 lines(randtree.pd.exact$expected.pd-1.96*sqrt(randtree.pd.exact$variance.pd), lty=2)
 lines(randtree.pd.ub$expected.pd+1.96*sqrt(randtree.pd.ub$variance.pd), lty=3)
 lines(randtree.pd.ub$expected.pd-1.96*sqrt(randtree.pd.ub$variance.pd), lty=3)
-legend("bottomright", lty=c(1,2,3), legend=c("Expected PD","95 percent CI (exact)","95 percent CI (upper bound)"))
+legend("bottomright", lty=c(1,2,3), legend=c("Expected PD",
+    "95 percent CI (exact)","95 percent CI (upper bound)"))
 }
 \keyword{univar}



More information about the Picante-commits mailing list