A119911 Natural numbers with number of divisors not equal to a Lucas number.
12, 16, 18, 20, 24, 28, 30, 32, 36, 40, 42, 44, 45, 48, 50, 52, 54, 56, 60, 63, 66, 68, 70, 72, 75, 76, 78, 80, 81, 84, 88, 90, 92, 96, 98, 99, 100, 102, 104, 105, 108, 110, 112, 114, 116, 117, 120, 124, 126, 128, 130, 132, 135, 136, 138, 140, 144, 147, 148
Offset: 1
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
With[{lnos=LucasL[Range[0,20]]},Select[Range[300],!MemberQ[ lnos, DivisorSigma[ 0,#]]&]] (* Harvey P. Dale, May 11 2014 *)
Extensions
More terms from Harvey P. Dale, May 11 2014