[R-SIG-Finance] adding p&l streams
brian meehan
dbmeehan at frontiernet.net
Mon Feb 9 19:52:12 CET 2009
i have a group of time series of p&ls
BEDH05U05_PL <- xts(yyy[,21], order.by = index(BEDH05U05_C['::2004-03']),
frequency = NULL )
BEDH04U04_PL <- xts(zzz[,21], order.by = index(BEDH04U04_C['::2003-03']),
frequency = NULL )
the p&ls are for only partially overlapping times...
> tail(BEDH05U05_PL )
[,1]
2003-03-24 83.50
2003-03-25 83.50
2003-03-26 75.25
2003-03-27 75.25
2003-03-28 82.25
2003-03-31 82.25
> tail(BEDH04U04_PL )
[,1]
2004-03-24 56.25
2004-03-25 56.25
2004-03-26 55.50
2004-03-29 55.50
2004-03-30 54.25
2004-03-31 54.25
i can combine the time series into a larger time series using
combined_pl <- merge (BEDH05U05_PL, BEDH04U04_PL )
i am trying to then add these two columns into a cumulative p&l. i tried
using combined_pl [is.na(combined_pl )] <- 0 to remove the NA values but
this doesnt solve the problem since when i hit the last p&l value in
BEDH05U05_PL the remaining values are set to 0 since they are NA. is there a
way to set all NA values until the first numerical value to 0 and then all
NA values after the last numerical value to the last p&l? i wasnt able to
find a fill forward type of function.
thanks - brian
More information about the R-SIG-Finance
mailing list