Skip to contents

Compute the Dat'AIDS score and survival prediction

Usage

surv_dataids(
  time,
  score = NULL,
  basesurv_fun = basesurv_hentzien2018,
  eta_fun = eta_dataids,
  age = NULL,
  cd4_count = NULL,
  nonhiv_cancer = NULL,
  cardio_disease = NULL,
  egfr = NULL,
  cirrhosis = NULL,
  low_bmi = NULL,
  anemia = NULL
)

eta_dataids(
  score = NULL,
  beta_score = 0.1008354015,
  age = NULL,
  cd4_count = NULL,
  nonhiv_cancer = NULL,
  cardio_disease = NULL,
  egfr = NULL,
  cirrhosis = NULL,
  low_bmi = NULL,
  anemia = NULL
)

eta_riskgroupdataids(
  score = NULL,
  beta_score = c(`0-3` = 0, `4-13` = 0.81868, `14-19` = 1.76034, `>=20` = 2.61992),
  age = NULL,
  cd4_count = NULL,
  nonhiv_cancer = NULL,
  cardio_disease = NULL,
  egfr = NULL,
  cirrhosis = NULL,
  low_bmi = NULL,
  anemia = NULL
)

score_dataids(
  age,
  cd4_count,
  nonhiv_cancer,
  cardio_disease,
  egfr,
  cirrhosis,
  low_bmi,
  anemia
)

riskgroup_dataids(score)

points_dataids()

Arguments

time

Numeric. Time of prediction in year.

score

Numeric. Dat'AIDS score. If NULL, the score is computed using the predictors.

basesurv_fun

Function of time. Default is basesurv_hentzien2018.

eta_fun

Function of the score which returns the linear predictor. Default is eta_dataids and eta_riskgroupdataids is available.

age

Numeric. Age in year.

cd4_count

Numeric. Count of CD4 cell/mm\(^3\).

nonhiv_cancer

Logical. TRUE for diagnosis of non-HIV cancer.

cardio_disease

Logical. TRUE for diagnosis of cardiovascular disease.

egfr

Numeric. Estimated glomerular filtration rate. (ml/min/1.73m\(^2\)).

cirrhosis

Logical. TRUE for cirrhosis diagnostic.

low_bmi

Logical. TRUE if BMI < 18.5.

anemia

Logical. TRUE for anemia defined as hemoglobin <12g/dL for female and <13g/dL for male.

beta_score

Numberic. Default is 0.1008354015 for continuous score and c("0-3"=0, "4-13"=0.81868, "14-19"=1.76034, ">=20"=2.61992) for risk group. Parameter associated to the score.

Value

Numeric. Predicted survival probability.

Details

The prediction of survival at time t is: $$\hat{S}(t) = S_0(t)^{\exp{b*\text{score}}}$$, where \(S_0(t)\) is basesurv_fun and \(b\) is beta_score.

score_dataids() returns a numerical vector, points_dataids() returns a list of the parameters used to compute the VACS Index 1 and surv_dataids() returns the survival probabilities a the baseline survival function.

References

Hentzien M, Delpierre C, Pugliese P, Allavena C, Jacomet C, Valantin M-A, et al. (2018) Derivation and internal validation of a mortality risk index for aged people living with HIV: The Dat'AIDS score. PLoS ONE 13(4): e0195725. https://doi.org/10.1371/journal.pone.0195725

See also

Other dataids: baseline

Other dataids: baseline

Other dataids: baseline

Examples

data(dataids)
dataids$dataids <- score_dataids(
    age = dataids$age, cd4_count = dataids$cd4_count,
    nonhiv_cancer = dataids$nonhiv_cancer, cardio_disease = dataids$cardio_disease,
    egfr = dataids$egfr, cirrhosis = dataids$cirrhosis, low_bmi = dataids$low_bmi,
    anemia = dataids$anemia)