%I #13 Dec 11 2023 18:28:09
%S 0,1,2,3,5,8,13,21,34,89,610,987,1597,2584,10946,28657,2178309
%N Fibonacci numbers with distinct digits.
%C If we add the condition of increasing digits, there are only 9 terms.
%t DeleteDuplicates[Select[Fibonacci[Range[0,49]], DeleteDuplicates[d=IntegerDigits[#]]==d &]] (* _Amiram Eldar_, Nov 15 2018 *)
%t Select[Fibonacci[Range[0,40]],Max[DigitCount[#]]==1&]//Union (* _Harvey P. Dale_, Dec 11 2023 *)
%Y Intersection of A000045 and A010784.
%K nonn,base,fini,full
%O 1,3
%A _Enrique Navarrete_, Nov 15 2018