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