A079658 Fibonacci numbers using only the straight digits 1, 4 and 7.

1, 1, 144, 17711

Offset

1,3

Comments

No other term <= Fibonacci(10000). - Emeric Deutsch, Jul 23 2006

No other term <= Fibonacci(10^8). - D. S. McNeil, Dec 08 2009

No other term <= Fibonacci(10^12). This sequence is almost certainly complete; in a random model the expected number of additional terms is less than 10^(-10000000000). - Charles R Greathouse IV, Sep 25 2012

Links

Table of n, a(n) for n=1..4.

Maple

with(combinat): a:=proc(n) if convert(convert(fibonacci(n), base, 10), set) subset {1, 4, 7}= true then fibonacci(n) else fi end: seq(a(n), n=1..5000); # Emeric Deutsch, Jul 23 2006

Mathematica

Select[Fibonacci[Range[50]], SubsetQ[{1, 4, 7}, IntegerDigits[#]]&] (* Harvey P. Dale, Jul 01 2017 *)

Crossrefs

Cf. A028373.

Sequence in context: A249181 A352511 A260861 * A280024 A091037 A304555

Adjacent sequences: A079655 A079656 A079657 * A079659 A079660 A079661

Keyword

base,nonn

Author

Shyam Sunder Gupta, Jan 23 2003

Status

approved