A171888 Records in A171868 (values).

1, 2, 5, 6, 9, 10, 11, 13, 15, 16, 18, 19, 21, 22, 23, 24, 27, 28, 29, 30, 31, 33, 34

Offset: 1

Author

N. J. A. Sloane, Oct 18 2010

Keywords

• nonn
• more

Links

• Rémy Sigrist, C program for A171888

Crossrefs

Cf. A181391, A171865, A171868, A171887.

Programs

C

// See Links section.

Python

A181391_list, A171888_list, l, r = [0, 0], [1], 0, 1
for n in range(1, 10**6):
    for m in range(n-1, -1, -1):
        if A181391_list[m] == A181391_list[n]:
            A181391_list.append(n-m)
            break
    else:
        A181391_list.append(0)
        if n-l > r:
            r = n-l
            A171888_list.append(r)
        l = n # Chai Wah Wu, Jan 02 2015

Extensions

a(12)-a(13) from Chai Wah Wu, Jan 02 2015

a(14)-a(17) from Rémy Sigrist, Jun 11 2019

a(18)-a(23) from Benjamin Chaffin, Sep 11 2019