[Blotter-commits] r62 - pkg/R

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

Author: jryan
Date: 2009-03-06 06:52:22 +0100 (Fri, 06 Mar 2009)
New Revision: 62

Modified:
   pkg/R/initAcct.R
Log:
changed final as.Date for 'TOTAL' Account to as.POSIXct


Modified: pkg/R/initAcct.R
===================================================================
--- pkg/R/initAcct.R	2009-03-05 05:47:41 UTC (rev 61)
+++ pkg/R/initAcct.R	2009-03-06 05:52:22 UTC (rev 62)
@@ -45,7 +45,7 @@
     # FUNCTION
     account=vector("list",length=(length(portfolios)+1))
     names(account)=c("TOTAL",portfolios)
-    account[["TOTAL"]] = xts( as.matrix(t(c(0,0,0,0,0,0,0,0,0,initEq))), order.by=as.Date(initDate) )
+    account[["TOTAL"]] = xts( as.matrix(t(c(0,0,0,0,0,0,0,0,0,initEq))), order.by=as.POSIXct(initDate) )
     colnames(account[["TOTAL"]]) = c('Additions', 'Withdrawals', 'Txn.Fees', 'Realized.PL', 'Unrealized.PL', 'Int.Income', 'Trading.PL', 'Advisory.Fees', 'Net.Performance', 'End.Eq')
     for(portfolio in portfolios){
         account[[portfolio]] = xts( as.matrix(t(c(0,0,0,0,0,0,0,0))), order.by=as.POSIXct(initDate) )