cp's OEIS Frontend

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.

A143967 Numbers containing only digits 3 or 7 in decimal representation.

This page as a plain text file.
%I A143967 #7 Aug 28 2017 15:16:16
%S A143967 3,7,33,37,73,77,333,337,373,377,733,737,773,777,3333,3337,3373,3377,
%T A143967 3733,3737,3773,3777,7333,7337,7373,7377,7733,7737,7773,7777,33333,
%U A143967 33337,33373,33377,33733,33737,33773,33777,37333,37337,37373,37377
%N A143967 Numbers containing only digits 3 or 7 in decimal representation.
%C A143967 See A020463 for primes.
%H A143967 Reinhard Zumkeller, <a href="/A143967/b143967.txt">Table of n, a(n) for n = 1..10000</a>
%F A143967 a(n) = f(n+1, 0) with f(n, x) = if n=1 then A004086(x) else f(floor(n/2), 10*x + 3 + 4*(n mod 2)).
%t A143967 Table[FromDigits/@Tuples[{3,7},n],{n,5}]//Flatten (* _Harvey P. Dale_, Aug 28 2017 *)
%o A143967 (Haskell)
%o A143967 a143967 = f 0 . (+ 1) where
%o A143967    f y 1 = a004086 y
%o A143967    f y x = f (10 * y + 3 + 4 * r) x' where (x', r) = divMod x 2
%o A143967 -- _Reinhard Zumkeller_, Mar 18 2015
%Y A143967 Cf. A004086, A020463, A032810.
%K A143967 base,nonn
%O A143967 1,1
%A A143967 _Reinhard Zumkeller_, Sep 06 2008