Passthrough to RiskScorescvd::calc_scores() with graceful fallback to NA.
Arguments
- data
Data required by
RiskScorescvd::calc_scores().- ...
Passed to
RiskScorescvd::calc_scores().
Value
Object returned by RiskScorescvd::calc_scores().
Examples
# \donttest{
if (requireNamespace("RiskScorescvd", quietly = TRUE)) {
df <- data.frame(
Age = 55, Sex = 0, Smoking_status = 1,
systolic.bp = 140, Total_cholesterol = 5.5,
HDL.cholesterol = 1.3
)
cvd_risk_scorescvd(df)
}
#> # A tibble: 1 × 4
#> model year risk value
#> <chr> <int> <dbl> <dbl>
#> 1 RiskScorescvd NA NA NA
# }