

A272331


Refactorable Fibonacci numbers.


0




OFFSET

1,2


COMMENTS



LINKS



FORMULA



EXAMPLE

8 is a term as a Fibonacci number that is divisible by the number of its divisors, (1,2,4,8), which is 4.


MAPLE

select(t > t mod numtheory:tau(t) = 0, map(combinat:fibonacci, [$2..200])); # Robert Israel, Apr 27 2016


MATHEMATICA

DeleteDuplicates@Select[Fibonacci@Range@200, Divisible[#, IntegerLength@#]&]


PROG

(PARI) for(n=2, 200, fn=fibonacci(n); fn%numdiv(fn)==0&&print1(fn ", "))


CROSSREFS

Intersection of A000045 (Fibonacci numbers) and A033950 (refactorable numbers).


KEYWORD

nonn,fini,full


AUTHOR



STATUS

approved



