# NOT RUN {
# Creating a new health item.
health1 <- health(name = c("pandemy", "longetivity", "storno"),
currency = c("EUR", "CHF", "EUR"),
sensitivity = c(100, 150, 130))
# printing the health item.
health1
# }
Run the code above in your browser using DataLab