A063940 Composite numbers k such that Ramanujan's function tau(k) (A000594) is not divisible by k.

22, 26, 33, 34, 38, 39, 44, 46, 51, 52, 55, 57, 58, 62, 65, 66, 68, 69, 74, 76, 77, 78, 82, 85, 86, 87, 93, 94, 95, 99, 102, 104, 106, 110, 111, 114, 116, 117, 118, 119, 121, 122, 123, 124, 129, 130, 132, 133, 134, 136, 138, 141, 142, 143, 145, 146, 148, 152, 153

Offset: 1

Author

Robert G. Wilson v, Aug 31 2001

Keywords

• nonn

Examples

			22 is a term because Ramanujan's tau(22) = 18643272 and 18643272 mod 22 = 10.
		

Links

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

Crossrefs

Cf. A000594, A063938, A007659.

Programs

Mathematica

Select[ Range[ 70 ], Mod[ CoefficientList[ Take[ Expand[ Product[ (1 - x^k)^24, {k, 1, 70} ] ], 70 ], x ][ [ # ] ], # ] != 0 && ! PrimeQ[ # ] & ]
(* First do *) <Dean Hickerson, Jan 03 2003 *)