# NOT RUN {
data(acme)
acme$Climb('IT', 'Outsource')$name
acme$Climb('IT')$Climb('Outsource')$name
acme$Climb(name = 'IT')
acme$Climb(position = c(2, 1))
#or, equivalent:
acme$Climb(position = 2, position = 1)
acme$Climb(name = "IT", cost = 250000)
tree <- CreateRegularTree(5, 2)
tree$Climb(c("1", "1"), position = c(2, 2))$path
# }
Run the code above in your browser using DataLab