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
Keywords
Examples
For n=24: A000073(24) = 2*2*2*51343, so a(24)=51343.
Links
- Amiram Eldar, Table of n, a(n) for n = 2..365
Programs
-
Mathematica
FactorInteger[#][[-1, 1]] & /@ LinearRecurrence[{1, 1, 1}, {1, 1, 2}, 46] (* Amiram Eldar, Oct 23 2023 *)