login
A323353
Numbers k such that A015525(k) is prime.
1
2, 3, 7, 11, 13, 73, 401, 421, 677, 3673, 4903, 13147, 24547
OFFSET
1,1
PROG
(PARI) print1(2, ", "); anm2=1; anm1=3; for(n=3, 1000, an=3*anm1+8*anm2; anm2=anm1; anm1=an; if(isprime(an), print1(n, ", ")))
(Perl) use ntheory ":all"; sub isok { is_prob_prime(lucasu(3, -8, $_[0])) }; for (1..700) { print "$_\n" if isok($_) }; # Daniel Suteu, Jan 12 2019
CROSSREFS
Sequence in context: A291657 A113244 A040152 * A188529 A369692 A174060
KEYWORD
nonn,more,hard
AUTHOR
Hugo Pfoertner, Jan 12 2019
EXTENSIONS
a(13) from Daniel Suteu, Jan 12 2019
STATUS
approved