Displaying 1 result from an estimated 1 matches for "byyoa".
Did you mean:
byoa
2008 Sep 03
0
Graphics: Improving a Lattice plot - can it be done ?
...ode.
library(reserving) # http://toolkit.pbwiki.com/RToolkit <http://toolkit.pbwiki.com/RToolkit>
data(GenIns)
GenInsInc <- incrementalTriangle(GenIns)
basicCL <- ChainLadder(GenIns, quarterly=FALSE, usetail=FALSE, YOA=c(1997:2006))
# lattice plot by underwriting years
plot(basicCL, byYOA=TRUE)
Instead of the ordinary "confidence bands" produced by the re lines, I would like to display a type of "funnel", as illustrated in the code below:
funnelGraph <- function(x, ylim, bands, ...)
{
#---------------------------------------------------------------------...