This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A079658 #14 Nov 16 2017 15:52:23 %S A079658 1,1,144,17711 %N A079658 Fibonacci numbers using only the straight digits 1, 4 and 7. %C A079658 No other term <= Fibonacci(10000). - _Emeric Deutsch_, Jul 23 2006 %C A079658 No other term <= Fibonacci(10^8). - _D. S. McNeil_, Dec 08 2009 %C A079658 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 %p A079658 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 %t A079658 Select[Fibonacci[Range[50]],SubsetQ[{1,4,7},IntegerDigits[#]]&] (* _Harvey P. Dale_, Jul 01 2017 *) %Y A079658 Cf. A028373. %K A079658 base,nonn %O A079658 1,3 %A A079658 _Shyam Sunder Gupta_, Jan 23 2003