[Xts-commits] r633 - in pkg/xts: R man

noreply at r-forge.r-project.org noreply at r-forge.r-project.org
Sat Jun 16 19:44:31 CEST 2012


Author: bodanker
Date: 2012-06-16 19:44:31 +0200 (Sat, 16 Jun 2012)
New Revision: 633

Modified:
   pkg/xts/R/toperiod.R
   pkg/xts/man/to.period.Rd
Log:
- Change default to drop.time=TRUE for to.monthly and to.quarterly


Modified: pkg/xts/R/toperiod.R
===================================================================
--- pkg/xts/R/toperiod.R	2012-06-15 21:06:26 UTC (rev 632)
+++ pkg/xts/R/toperiod.R	2012-06-16 17:44:31 UTC (rev 633)
@@ -157,7 +157,7 @@
   return(x)
 }
 `to.monthly` <-
-function(x,indexAt='yearmon',drop.time=FALSE,name,...)
+function(x,indexAt='yearmon',drop.time=TRUE,name,...)
 {
   if(missing(name)) name <- deparse(substitute(x))
   x <- to.period(x,'months',indexAt=indexAt,name=name,...)
@@ -165,7 +165,7 @@
   return(x)
 }
 `to.quarterly` <-
-function(x,indexAt='yearqtr',drop.time=FALSE,name,...)
+function(x,indexAt='yearqtr',drop.time=TRUE,name,...)
 {
   if(missing(name)) name <- deparse(substitute(x))
   x <- to.period(x,'quarters',indexAt=indexAt,name=name,...)

Modified: pkg/xts/man/to.period.Rd
===================================================================
--- pkg/xts/man/to.period.Rd	2012-06-15 21:06:26 UTC (rev 632)
+++ pkg/xts/man/to.period.Rd	2012-06-16 17:44:31 UTC (rev 633)
@@ -39,8 +39,8 @@
 to.daily(x,drop.time=TRUE,name,...)
 
 to.weekly(x,drop.time=TRUE,name,...)
-to.monthly(x,indexAt='yearmon',drop.time=FALSE,name,...)
-to.quarterly(x,indexAt='yearqtr',drop.time=FALSE,name,...)
+to.monthly(x,indexAt='yearmon',drop.time=TRUE,name,...)
+to.quarterly(x,indexAt='yearqtr',drop.time=TRUE,name,...)
 to.yearly(x,drop.time=TRUE,name,...)
 
 to.period(x,



More information about the Xts-commits mailing list