login
A152081
Least prime divisor of terms of A152080.
0
5, 7, 3, 7, 5, 3, 11, 3, 5, 7, 3, 11, 13, 3, 7, 3, 3, 5, 5, 3, 5, 3, 13, 17, 3, 7, 11, 5, 7, 5, 3, 3, 7, 5, 3, 11, 5, 5, 19, 7, 5, 29, 3, 3, 11, 5, 5, 7, 11, 3, 7, 29, 5, 3, 3, 19, 3, 3, 3, 13, 5, 7, 29, 7, 31, 3, 23, 17, 13, 13, 3, 19, 3, 3, 7, 3, 5, 7, 3, 11, 11, 29, 37
OFFSET
1,1
FORMULA
a(n) = A020639(A152080(n)). - Michel Marcus, Sep 24 2023
PROG
(PARI) a000695(n) = fromdigits(binary(n), 4);
lista(nn) = forcomposite(n=1, nn, if (isprime(a000695(n)), print1(factor(n)[1, 1], ", "))); \\ Michel Marcus, Dec 18 2018
KEYWORD
nonn
AUTHOR
Vladimir Shevelev, Nov 23 2008
EXTENSIONS
More terms from Michel Marcus, Jun 02 2013
More terms from Michel Marcus, Dec 18 2018
STATUS
approved