OFFSET
1,3
COMMENTS
A000045 INTERSECT A011540 is a subsequence. As a consequence of Carmichael's theorem, the product of the digits of terms in the sequence must be in the set {0, 1, 2, 3, 5, 8, 21, 144} and if a term is zeroless (A052382), then at most 6 digits are not equal to 1. Conjecture: all terms > 21 have a 0 digit, i.e. is a member of A011540. - Chai Wah Wu, Mar 12 2016
LINKS
Chai Wah Wu, Table of n, a(n) for n = 1..1000
EXAMPLE
21 is in the sequence because (1)it is a Fibonacci number and (2)the product of its digits 2*1=2 is also a Fibonacci number.
MATHEMATICA
With[{fibs=Fibonacci[Range[0, 100]]}, Select[fibs, MemberQ[fibs, Times@@ IntegerDigits[ #]]&]]//Union (* Harvey P. Dale, Aug 27 2016 *)
PROG
(Python)
from operator import mul
from functools import reduce
A117770_list, a, b = [0], 1, 1
for i in range(10**3):
if reduce(mul, (int(d) for d in str(b))) in (0, 1, 2, 3, 5, 8, 21, 144):
A117770_list.append(b)
a, b = b, a+b # Chai Wah Wu, Mar 13 2016
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Luc Stevens (lms022(AT)yahoo.com), Apr 15 2006
EXTENSIONS
Entries checked by Klaus Brockhaus, Apr 17 2006
STATUS
approved