sBG.est: Shifted Beta Gamma Model Parameter Estimates

Description Usage Arguments Value Examples

View source: R/functions.R

Description

This function estimates parameters for the shifed beta gamma distribution (often used in survival curves) and used by the survivalCurve function.

Usage

1
sBG.est(active.vec, lost.vec)

Arguments

active.vec

Numeric vector representing active members

lost.vec

Numeric vector representing lost members

Value

Returns a vector of parameters (alpha and beta)

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
## Not run: 
library(dplyr)
library(titanic)
titanic::titanic_train %>%
mutate(Deceased = ifelse(Survived == 1,0,1)) %>%
group_by(Age = round(Age,0)) %>%
summarise(Survived = sum(Survived), Deceased = sum(Deceased)) %>% {
sBG.est(
.$Survived[2:nrow(.)],
.$Deceased[2:nrow(.)]
)$par}

## End(Not run)

jsdeherrera/shinyStats documentation built on May 13, 2019, 11:54 p.m.