Description Usage Arguments Examples
setUpperKeep
sets up the upper triangle for non-simulated data.
1 2 3 4 5 6 | setUpperKeep(object, data, ...)
## S4 method for signature 'Triangle,data.frame'
setUpperKeep(object, data,
evaluationDate = as.Date("2016-12-31"), lob = "Total",
ctype = "Total")
|
object |
Triangle Object |
data |
Claim Data |
... |
Additional function arguments. |
evaluationDate |
Evaluation Date; |
lob |
Line of Business; |
ctype |
Claim Type. |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 | library(cascsim)
data(claimdata)
xTri <- new("Triangle", triID = "TRI1", type = "reportedCount", startDate=as.Date("2012-01-01"),
frequency="yearly", sim=1, percentile=50, iRBNER=TRUE, iROPEN=TRUE)
xTri<-setUpperTriangle(xTri,claimdata)
xTri<-setUpperKeep(xTri,claimdata)
xTri@upperkeep
xTri <- new("Triangle", triID = "TRI1", type = "closedCount", startDate=as.Date("2012-01-01"),
frequency="quarterly", sim=1, percentile=50, iRBNER=FALSE, iROPEN=TRUE)
xTri<-setUpperTriangle(xTri,claimdata)
xTri<-setUpperKeep(xTri,claimdata)
xTri@upperkeep
xTri <- new("Triangle", triID = "TRI1", type = "incurredLoss", startDate=as.Date("2012-01-01"),
frequency="yearly", sim=1, percentile=50, iRBNER=TRUE, iROPEN=FALSE)
xTri<-setUpperTriangle(xTri,claimdata)
xTri<-setUpperKeep(xTri,claimdata,lob="Auto",ctype="H")
xTri@upperkeep
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.