A038542 Primes p such that Ramanujan function tau(p) is divisible by 11.

19, 29, 199, 337, 421, 433, 443, 463, 569, 577, 593, 607, 641, 757, 809, 821, 887, 1021, 1049, 1063, 1289, 1439, 1471, 1499, 1607, 1621, 1637, 1901, 1987, 1993, 2221, 2417, 2473, 2539, 2621, 2699, 2803, 2917, 3121, 3319, 3343, 3361, 3433

Offset: 1

Author

Paolo Dominici (pl.dm(AT)libero.it)

Keywords

• nonn

References

• Robert A. Rankin, Ramanujan's tau-function and its generalizations, in: G. E. Andrews et al. (eds.), Ramanujan Revisited, Proceedings of the Centenary Conference, University of Illinois at Urbana-Champaign, June 1-5, 1987, Academic Press, 1988, pp. 245-268.

Links

• Amiram Eldar, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A038543, A076847.

Programs

Mathematica

Select[Range[3500], PrimeQ[#] && Divisible[RamanujanTau[#], 11] &] (* Amiram Eldar, Mar 28 2021 *)

PARI

lista (nn) = {forprime(p=1, nn, if (taup(p) % 11 == 0, print1(p, ", ")););} \\ (with taup(p) defined in A076847) Michel Marcus, Jun 26 2013

Perl

use ntheory ":all"; forprimes { say unless ramanujan_tau($) % 11; } 1e4; # _Dana Jacobsen, Sep 05 2015