A299976 Lexicographic first sequence of positive integers such that a(n) + a(n+1) has a digit 6, and no term occurs twice.

1, 5, 11, 15, 21, 25, 31, 29, 7, 9, 17, 19, 27, 33, 3, 13, 23, 37, 24, 2, 4, 12, 14, 22, 34, 26, 10, 6, 20, 16, 30, 32, 28, 8, 18, 38, 48, 58, 68, 78, 82, 44, 42, 54, 52, 64, 62, 74, 72, 84, 76, 40, 36, 50, 46, 60, 56, 70, 66, 80, 81, 35, 41, 45, 51, 55, 61, 65, 71, 75, 85, 77, 39, 47, 49, 57, 59, 67, 69, 87, 73, 43, 53, 63, 83, 79, 86, 90, 96, 100

Offset

1,2

Comments

A permutation of the positive integers.

Links

Table of n, a(n) for n=1..90.

Prog

(PARI) a(n, f=1, d=6, a=1, u=[a])={for(n=2, n, f&&if(f==1, print1(a", "), write(f, n-1, " "a)); for(k=u[1]+1, oo, setsearch(u, k)&&next; setsearch(Set(digits(a+k)), d)&&(a=k)&&break); u=setunion(u, [a]); u[2]==u[1]+1&&u=u[^1]); a}

Crossrefs

Cf. A299986 (analog with nonnegative terms), A299957 (analog with digit 1), A299971, A299972, ..., A299979 (digit 0, 2, ..., 9).

Sequence in context: A224213 A036787 A182664 * A187715 A314038 A314039

Adjacent sequences: A299973 A299974 A299975 * A299977 A299978 A299979

Keyword

nonn,base

Author

M. F. Hasler and Eric Angelini, Feb 22 2018

Status

approved