calculateScoreEur(age, cholesterol, SBP, currentSmoker, gender = "Men", risk = "Low risk")
,,Estimation of ten-year risk of fatal cardiovascular disease in Europe: the SCORE project'' R.M. Conroy et. al. Eur Heart J (2003) 24 (11): 987-1003. doi: 10.1016/S0195-668X(03)00114-3