A360591 Primes in A360464.

2, 3, 5, 7, 17, 29, 43, 59, 97, 193, 251, 277, 389, 439, 491, 577, 601, 659, 719, 911, 1049, 1237, 1429, 1511, 1951, 2141, 2239, 2293, 2339, 2441, 3329, 3449, 3571, 3637, 3821, 3889, 4079, 4211, 4481, 4759, 5569, 5641, 6269, 6761, 7537, 7621, 8161, 8629, 8719

Offset: 1

Author

Jack Braxton, Feb 12 2023

Keywords

• nonn
• fini

Comments

This sequence is finite and a(103) = A360464(457) = 61861 is the last term here, since A360464(k) is divisible by 5 for all k >= 458.

Crossrefs

Cf. A000040, A360464.

Programs

Mathematica

s[1] = s[2] = s[3] = 1; s[n_] := s[n] = s[n - 1] + s[n - 2] - s[n - 3] + GCD[s[n - 1], s[n - 3]]; Select[Array[s, 180], PrimeQ] (* Amiram Eldar, Feb 24 2023 *)

Formula

A000040 intersect A360464.