Cyclical figurate numbers (Euler Problem 61)

Back to overview.

https://projecteuler.net/problem=61

Triangle, square, pentagonal, hexagonal, heptagonal, and octagonal numbers are all figurate (polygonal) numbers and are generated by the following formulae:

Triangle P3,n=n(n+1)/2 1, 3, 6, 10, 15, ...

Square P4,n=n2 1, 4, 9, 16, 25, ...

Pentagonal P5,n=n(3n−1)/2 1, 5, 12, 22, 35, ...

Hexagonal P6,n=n(2n−1) 1, 6, 15, 28, 45, ...

Heptagonal P7,n=n(5n−3)/2 1, 7, 18, 34, 55, ...

Octagonal P8,n=n(3n−2) 1, 8, 21, 40, 65, ...

The ordered set of three 4-digit numbers: 8128, 2882, 8281, has three interesting properties.

The set is cyclic, in that the last two digits of each number is the first two digits of the next number (including the last number with the first). Each polygonal type: triangle (P3,127=8128), square (P4,91=8281), and pentagonal (P5,44=2882), is represented by a different number in the set. This is the only set of 4-digit numbers with this property. Find the sum of the only ordered set of six cyclic 4-digit numbers for which each polygonal type: triangle, square, pentagonal, hexagonal, heptagonal, and octagonal, is represented by a different number in the set.

In [1]:
def get_four_digit_numbers(function):
    r = []
    n = 1
    f = function
    while f(n) < 10000:
        if f(n) > 999:
            r.append(f(n))
        n += 1
    return r

triangles = get_four_digit_numbers(lambda n: n * (n + 1) // 2)
squares = get_four_digit_numbers(lambda n: n**2)
pentas = get_four_digit_numbers(lambda n: n * (3 * n - 1) // 2)
hexas = get_four_digit_numbers(lambda n: n * (2 * n - 1))
heptas = get_four_digit_numbers(lambda n: n * (5*n - 3) // 2)
octas = get_four_digit_numbers(lambda n: n * (3*n - 2))
In [2]:
def is_cyclic(a, b):
    return str(a)[-2:] == str(b)[:2]

assert(is_cyclic(3328, 2877))
assert(is_cyclic(3329, 2877) == False)
In [3]:
def search_solution(aggregator, polygonals):
    if not polygonals:
        if is_cyclic(aggregator[-1], aggregator[0]):
            return aggregator
        else:
            return []

    if not aggregator:
        for polygonal in polygonals:
            for number in polygonal:
                aggregator.append(number)
                s = search_solution(aggregator, [p for p in polygonals if p != polygonal])
                if s:
                    return s
                aggregator.pop()

    for polygonal in polygonals:
        for number in polygonal:
            if is_cyclic(aggregator[-1], number) and not number in aggregator:
                aggregator.append(number)
                s = search_solution(aggregator, [p for p in polygonals if p != polygonal])
                if s:
                    return s
                aggregator.pop()
    return []

s = search_solution([], [triangles, squares, pentas, hexas, heptas, octas])
print(s)
s = sum(s)
print(s)
assert(s == 28684)
[8256, 5625, 2512, 1281, 8128, 2882]
28684
In [ ]: