login
A130331
Number of divisors of A123240(n).
1
4, 4, 4, 6, 4, 4, 6, 6, 4, 4, 4, 4, 6, 6, 4, 4, 4, 9, 4, 4, 6, 6, 4, 10, 6, 4, 6, 4, 4, 4, 12, 4, 6, 7, 4, 6, 4, 12, 4, 6, 6, 4, 10, 4, 12, 4, 4, 4, 12, 4, 6, 4, 4, 4, 12, 6, 6, 9, 4, 12, 4, 10, 4, 6, 6, 4, 4, 16, 4, 4, 6, 4, 12, 4, 12, 4, 4, 12, 4, 4, 4, 15, 4, 4, 6, 6, 12, 6, 4, 12, 4, 4, 12, 4, 10, 6, 4
OFFSET
1,1
COMMENTS
By definition, each term is in A001690. - R. J. Mathar, Jan 15 2008
LINKS
FORMULA
a(n) = A000005(A123240(n)). - R. J. Mathar, Jan 15 2008
MATHEMATICA
seq[max_] := Module[{d = DivisorSigma[0, Range[max]], dmax, k = 2}, dmax = Max[d]; While[Fibonacci[k] < dmax, k++]; Select[d, !MemberQ[Fibonacci[Range[2, k]], #] &]]; seq[300] (* Amiram Eldar, Apr 08 2024 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Giovanni Teofilatto, Aug 07 2007
EXTENSIONS
More terms from R. J. Mathar, Jan 15 2008
STATUS
approved