OFFSET
1,1
COMMENTS
LINKS
Dana Jacobsen, Table of n, a(n) for n = 1..1000
PROG
(Perl) use ntheory ":all"; for $p (@{ramanujan_primes(1e6)}) { say ++$i, " $p" unless ($p-1) % 3 } # - Dana Jacobsen, Aug 13 2015
(Perl) use ntheory ":all"; for $p (@{ramanujan_primes(1e6)}) { say ++$i, " $p" if (ramanujan_tau($p) % 3) == 2; } # Much slower alternate method - Dana Jacobsen, Aug 13 2015
CROSSREFS
KEYWORD
nonn
AUTHOR
Irina Gerasimova, Nov 27 2013
EXTENSIONS
Corrected by Dana Jacobsen, Aug 13 2015.
STATUS
approved