A147317 Numbers k which divide tau(k) and are not 7-smooth (where tau(k) = A000594(k) is Ramanujan's tau function).

88, 91, 92, 115, 161, 182, 207, 230, 264, 273, 276, 322, 345, 364, 414, 440, 455, 460, 483, 546, 549, 616, 644, 690, 728, 736, 792, 805, 819, 828, 910, 920, 928, 966, 1035, 1092, 1098, 1144, 1288, 1320, 1365, 1380, 1408, 1449, 1456, 1610, 1638, 1656, 1820

Offset

1,1

Links

Amiram Eldar, Table of n, a(n) for n = 1..7427 (calculated from the b-file at A063938).

Mathematica

aa = {}; Do[If[Mod[RamanujanTau[n], n] == 0 && EulerPhi[210 n] != 48 n, AppendTo[aa, n]], {n, 1, 2000}]; aa

Crossrefs

Cf. A063938, A002473.

Sequence in context: A109989 A239154 A181469 * A143846 A361105 A255226

Adjacent sequences: A147314 A147315 A147316 * A147318 A147319 A147320

Keyword

nonn

Author

Artur Jasinski, Nov 05 2008

Status

approved