OFFSET
1,1
COMMENTS
A000005(a(n)) is a Fibonacci number.
EXAMPLE
16 is a term because it is not a Fibonacci number and its number of divisors is 5, a Fibonacci number.
MATHEMATICA
fibs=Fibonacci[Range[15]]; nonfibs=Complement[Range[fibs[[-1]]], fibs]; Select[nonfibs, MemberQ[fibs, DivisorSigma[0, #]]&] (* Harvey P. Dale, Jan 11 2011 *)
With[{fibs=Fibonacci[Range[20]]}, Select[Range[200], !MemberQ[fibs, #]&&MemberQ[fibs, DivisorSigma[0, #]]&]] (* Harvey P. Dale, Apr 04 2026 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Omar E. Pol, May 22 2008
STATUS
approved
