A272901 Smallest k>=1 such that A067128(n+k) - A067128(n) is in A067128 or a(n)=0 if there is no such k.

1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 2, 2, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 2

Offset

1,47

Comments

For n=151, the required k, if it exists, should be >9800. So one can conjecture that a(151) is the first zero term.

Links

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

Maple

A272901 := proc(n)
    local k;
    for k from 1 do
        if isA067128(A067128(n+k)-A067128(n)) then
            return k;
        end if;
    end do:
end proc:
for n from 1 do
    printf("%d %d\n", n, A272901(n)) ;
end do: # R. J. Mathar, Apr 15 2024

Crossrefs

Cf. A067128, A272879.

Sequence in context: A329684 A294619 A054977 * A078315 A365685 A346418

Adjacent sequences: A272898 A272899 A272900 * A272902 A272903 A272904

Keyword

nonn,changed

Author

Vladimir Shevelev and Peter J. C. Moses, May 09 2016

Status

approved