# Create patient data table

Source: `R/model-setup.R`
`create_patients.Rd`

Create a data table of patients to model.

    create_patients(n, female_prop = 0.48, age_mean = 70.39,
      age_sd = 11.68, mutation_prob = 0.52)

## Arguments

n | Number of patients to model.
female_prop | The proportion of patients that are female.
age_mean | Mean age. Based on sources cited in `age_dist`.
age_sd | Standard deviation of age. Based on sources cited in `age_dist`.
mutation_prob | The probability of a T790M mutation. The default value is based on Table 3 from the article by Ma et al. cited below.

## Value

An object of class "patients", which is a `data.table` containing each modeled patient. Columns are:

patient_id

  An integer from 1 to `n` denoting a unique patient.

mutation

  1 if a patient has a T790M mutation and 0 otherwise.

female

  1 if a patient is female and 0 otherwise.

## References

Ma C, Wei S, Song Y. T790M and acquired resistance of EGFR TKI: a literature review of clinical reports. Journal of thoracic disease. 2011 Mar;3(1):10.

https://seer.cancer.gov/csr/1975_2015/results_merged/topic_age_dist.pdf

## See also

`age_dist`

## Examples

    create_patients(n = 10)#>     patient_id female      age mutation
    #>  1:          1      1 59.36289        0
    #>  2:          2      1 49.58720        1
    #>  3:          3      1 62.02643        0
    #>  4:          4      1 81.03140        0
    #>  5:          5      0 61.37080        1
    #>  6:          6      0 61.25533        1
    #>  7:          7      1 65.34196        0
    #>  8:          8      1 62.59284        0
    #>  9:          9      0 86.61943        1
    #> 10:         10      0 81.04069        0