login
A054789
Earliest sequence with a(a(n)) = 9n.
0
0, 2, 9, 4, 27, 6, 45, 8, 63, 18, 11, 90, 13, 108, 15, 126, 17, 144, 81, 20, 171, 22, 189, 24, 207, 26, 225, 36, 29, 252, 31, 270, 33, 288, 35, 306, 243, 38, 333, 40, 351, 42, 369, 44, 387, 54, 47, 414, 49, 432, 51, 450, 53, 468, 405, 56, 495, 58, 513, 60, 531, 62, 549
OFFSET
0,2
MATHEMATICA
a[0] = 0; a[n_] := Which[m = Mod[n, 18]; m == 0, 9*n-81, m == 9, n+9, MemberQ[ {1, 3, 5, 7, 10, 12, 14, 16}, m], n+1, True, 9*n-9]; Table[ a[n], {n, 0, 62}] (* Jean-François Alcover, Sep 24 2012 *)
CROSSREFS
KEYWORD
nice,nonn
AUTHOR
Henry Bottomley, Apr 27 2000
STATUS
approved