# \(power) is short for function(power)pow_of_two <- \(power) 2^powerpow8 <- pow_of_two(8)# pow8 = 256pow_of_three <- function(power) 3^powerpow3 <- pow_of_three(3)# pow3 = 27cat("pow8 =", pow8, "\n")cat("pow3 =", pow3, "\n")