RosettaCodeData/Task/Exponentiation-order/R/exponentiation-order-4.r
2023-07-01 13:44:08 -04:00

2 lines
155 B
R

inputs <- alist(5^3^2, (5^3)^2, 5^(3^2), 5**3**2, (5**3)**2, 5**(3**2))
invisible(sapply(inputs, function(x) cat(deparse(x), "returns: ", eval(x), "\n")))