RosettaCodeData/Task/Man-or-boy-test/R/man-or-boy-test-4.r

4 lines
113 B
R

> options(expressions=10000)
> mapply(A, 0:10, 1, -1, -1, 1, 0)
[1] 1 0 -2 0 1 0 1 -1 -10 -30 -67