A065569 Smallest k such that omega(n+k) = omega(k).

2, 2, 2, 3, 2, 2, 2, 3, 2, 3, 2, 4, 3, 2, 2, 3, 2, 5, 4, 3, 2, 3, 2, 3, 2, 3, 2, 3, 2, 2, 14, 5, 4, 3, 2, 5, 4, 3, 2, 3, 2, 5, 4, 3, 2, 3, 2, 5, 4, 3, 2, 6, 8, 5, 4, 3, 2, 3, 2, 4, 3, 2, 4, 3, 2, 5, 4, 3, 2, 3, 2, 7, 8, 5, 4, 3, 2, 3, 2, 3, 2, 6, 10, 5, 4, 3, 2, 6, 6, 6, 15, 5, 4, 3, 2, 5, 4, 3, 2, 3, 2, 5, 4

Offset

1,1

Links

Harry J. Smith, Table of n, a(n) for n=1..1000

Prog

(PARI): ome(m)= {local(k, n); for(k=1, m, n=1; while(omega(n)!=omega(n+k), n++); print1(n, ", "))} ome(200)
(PARI) { for (n=1, 1000, k=1; while(omega(n + k) != omega(k), k++); write("b065569.txt", n, " ", k) ) } \\ Harry J. Smith, Oct 23 2009

Crossrefs

Cf. A001221, A065925.

Sequence in context: A056608 A091787 A087040 * A262941 A127656 A109709

Adjacent sequences: A065566 A065567 A065568 * A065570 A065571 A065572

Keyword

nonn

Author

Jason Earls, Nov 30 2001

Status

approved