calculate_esc_2013_ptp {pretestcad} | R Documentation |
Calculate ESC 2013 PTP for obstructive CAD
Description
This function returns a patient's pre-test Probability (PTP) of obstructive coronary artery disease (CAD) based on the European Society of Cardiology (ESC) 2013 guidelines.
Usage
calculate_esc_2013_ptp(
age,
sex,
chest_pain_type,
output = c("numeric", "percentage")
)
Arguments
age |
Input integer value to indicate the age of the patient. |
sex |
Input characters (female, male) to indicate the sex of the patient.
|
chest_pain_type |
Input characters (typical, atypical, nonanginal) to indicate the chest pain characteristics of the patient.
|
output |
Input text to indicate the how pre-test probability results be expressed Default: c("numeric", "percentage")
|
Details
The predictive model used to create the guidelines are based on the journal A clinical prediction rule for the diagnosis of coronary artery disease: validation, updating, and extension by 2011 Genders et. al.
Value
An integer or percentage representing the patient's PTP for obstructive CAD based on the ESC 2013 guidelines.
Examples
# 35 year old female with typical chest pain
calculate_esc_2013_ptp(
age = 35,
sex = "female",
chest_pain_type = "typical",
output = "percentage"
)
# 65 year old male with nonanginal chest pain
calculate_esc_2013_ptp(
age = 65,
sex = "male",
chest_pain_type = "nonanginal",
output = "percentage"
)