A116648 Least natural number which does not occur in A116626(1..n).

2, 2, 4, 4, 5, 5, 5, 5, 7, 7, 7, 7, 7, 7, 9, 9, 11, 11, 11, 11, 11, 11, 18, 18, 19, 19, 19, 19, 20, 20, 20, 20, 21, 21, 21, 21, 21, 21, 21, 21, 27, 27, 27, 27, 27, 27, 27, 27, 29, 29, 29, 29, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 39, 39, 39, 39, 42, 42, 42, 42, 44, 44, 44, 44

Offset

1,1

Links

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

Prog

(MIT Scheme:) (define (A116648 n) (if (< n 2) (+ n 1) (let ((prev (A116648 (- n 1)))) (cond ((not (= (A116626 n) prev)) prev) (else (let loop ((i (+ 1 prev))) (cond ((> (A116627 i) n) i) (else (loop (+ 1 i))))))))))

Crossrefs

Cf. A116649, A116650, A116651.

Sequence in context: A300755 A307825 A347660 * A152850 A036714 A319398

Adjacent sequences: A116645 A116646 A116647 * A116649 A116650 A116651

Keyword

nonn

Author

Antti Karttunen, Feb 21 2006

Status

approved