[Dplr-commits] r882 - pkg/dplR/man

[noreply at r-forge.r-project.org]

Author: mvkorpel
Date: 2014-05-17 15:21:09 +0200 (Sat, 17 May 2014)
New Revision: 882

Modified:
   pkg/dplR/man/combine.rwl.Rd
   pkg/dplR/man/corr.rwl.seg.Rd
   pkg/dplR/man/pointer.Rd
   pkg/dplR/man/strip.rwl.Rd
Log:
Edited examples to reduce the number of lines printed to the console
or log file


Modified: pkg/dplR/man/combine.rwl.Rd
===================================================================
--- pkg/dplR/man/combine.rwl.Rd	2014-05-17 08:40:28 UTC (rev 881)
+++ pkg/dplR/man/combine.rwl.Rd	2014-05-17 13:21:09 UTC (rev 882)
@@ -31,9 +31,10 @@
 
 \examples{data(ca533)
 data(co021)
-combine.rwl(list(ca533, co021))
+combi1 <- combine.rwl(list(ca533, co021))
 ## or alternatively for data.frames to combine
-combine.rwl(ca533, co021)
+combi2 <- combine.rwl(ca533, co021)
+identical(combi1, combi2) # TRUE
 }
 
 \keyword{ manip }
\ No newline at end of file

Modified: pkg/dplR/man/corr.rwl.seg.Rd
===================================================================
--- pkg/dplR/man/corr.rwl.seg.Rd	2014-05-17 08:40:28 UTC (rev 881)
+++ pkg/dplR/man/corr.rwl.seg.Rd	2014-05-17 13:21:09 UTC (rev 882)
@@ -127,7 +127,12 @@
   \code{\link{series.rwl.plot}}, \code{\link{ccf.series.rwl}}
 }
 \examples{data(co021)
-corr.rwl.seg(co021, seg.length = 100, label.cex = 1.25)
+crs <- corr.rwl.seg(co021, seg.length = 100, label.cex = 1.25)
+names(crs)
+## Average correlation and p-value for the first few series
+head(crs$overall)
+## Average correlation for each bin
+crs$avg.seg.rho
 }
 \keyword{ manip }
 

Modified: pkg/dplR/man/pointer.Rd
===================================================================
--- pkg/dplR/man/pointer.Rd	2014-05-17 08:40:28 UTC (rev 881)
+++ pkg/dplR/man/pointer.Rd	2014-05-17 13:21:09 UTC (rev 882)
@@ -111,5 +111,7 @@
 
 \examples{## Pointer years calculation on ring-width series. Returns a data.frame.
 data(gp.rwl)
-pointer(rwl=gp.rwl, rgv.thresh=10, nseries.thresh=75, round.decimals=2)
+py <- pointer(rwl=gp.rwl, rgv.thresh=10, nseries.thresh=75,
+              round.decimals=2)
+tail(py)
 }

Modified: pkg/dplR/man/strip.rwl.Rd
===================================================================
--- pkg/dplR/man/strip.rwl.Rd	2014-05-17 08:40:28 UTC (rev 881)
+++ pkg/dplR/man/strip.rwl.Rd	2014-05-17 13:21:09 UTC (rev 882)
@@ -78,7 +78,8 @@
 \examples{
 data(anos1)
 anos1.ids <- read.ids(anos1, stc = c(4, 3, 1))
-strip.rwl(anos1, ids = anos1.ids, verbose = TRUE)
+srwl <- strip.rwl(anos1, ids = anos1.ids, verbose = TRUE)
+tail(srwl)
 }
 \author{
   Christian Zang.  Patched and improved by Mikko Korpela.