A366584 a(2) = a(3) = 1; for n >3, a(n) = largest prime factor of n-th Tribonacci number.

1, 1, 2, 2, 7, 13, 3, 11, 3, 149, 137, 7, 103, 31, 7, 103, 103, 79, 97, 5501, 3469, 919, 51343, 188869, 853, 1427, 470077, 239, 313, 307, 73, 883483, 11113, 227, 53, 3833, 631, 40093, 4349, 354763, 142739687, 45181, 40320889337, 71584631, 3331, 5500283

Offset

2,3

Links

Amiram Eldar, Table of n, a(n) for n = 2..365

Formula

a(n) = A006530(A000073(n)).

Example

For n=24: A000073(24) = 2*2*2*51343, so a(24)=51343.

Mathematica

FactorInteger[#][[-1, 1]] & /@ LinearRecurrence[{1, 1, 1}, {1, 1, 2}, 46] (* Amiram Eldar, Oct 23 2023 *)

Crossrefs

Cf. A000073, A231575, A101757.

Sequence in context: A047767 A303588 A366583 * A019144 A362318 A049953

Adjacent sequences: A366581 A366582 A366583 * A366585 A366586 A366587

Keyword

nonn

Author

Tyler Busby, Oct 13 2023

Status

approved