login
A321656
Fibonacci numbers with distinct digits.
0
0, 1, 2, 3, 5, 8, 13, 21, 34, 89, 610, 987, 1597, 2584, 10946, 28657, 2178309
OFFSET
1,3
COMMENTS
If we add the condition of increasing digits, there are only 9 terms.
MATHEMATICA
DeleteDuplicates[Select[Fibonacci[Range[0, 49]], DeleteDuplicates[d=IntegerDigits[#]]==d &]] (* Amiram Eldar, Nov 15 2018 *)
Select[Fibonacci[Range[0, 40]], Max[DigitCount[#]]==1&]//Union (* Harvey P. Dale, Dec 11 2023 *)
CROSSREFS
Intersection of A000045 and A010784.
Sequence in context: A093332 A254786 A050762 * A005170 A226999 A218032
KEYWORD
nonn,base,fini,full
AUTHOR
Enrique Navarrete, Nov 15 2018
STATUS
approved