# NOT RUN {
mydata <- data.frame(
sbp = c(122, 102.5),
dbp = c(76.5, 64),
trigs = c(1.47, 1.27),
hdl = c(2.22, 1.59),
waist = c(71, 91),
glucose = c(5.16, 5.82),
sex = c("Female", "Male"))
MetSSS(mydata)
# }
Run the code above in your browser using DataLab