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.

A036318 Composite numbers whose prime factors contain no digits other than 4 and 7.

This page as a plain text file.
%I A036318 #25 May 22 2022 05:51:08
%S A036318 49,329,343,2209,2303,2401,15463,16121,16807,31129,52339,103823,
%T A036318 108241,112847,117649,209009,217903,313439,334439,351419,366373,
%U A036318 523229,542129,542339,544229,726761,757687,789929,823543,1463063,1525321,2104519
%N A036318 Composite numbers whose prime factors contain no digits other than 4 and 7.
%C A036318 All terms are a product of at least two terms of A020465. - _David A. Corneth_, Oct 09 2020
%H A036318 David A. Corneth, <a href="/A036318/b036318.txt">Table of n, a(n) for n = 1..10000</a>
%H A036318 <a href="/index/Pri#prime_factors">Index entries sequences related to prime factors</a>.
%F A036318 Sum_{n>=1} 1/a(n) = Product_{p in A020465} (p/(p - 1)) - Sum_{p in A020465} 1/p - 1 = 0.0279830135... . - _Amiram Eldar_, May 22 2022
%t A036318 pf47Q[n_]:=Module[{u=Union[Flatten[IntegerDigits/@Transpose[ FactorInteger[ n]][[1]]]]},!PrimeQ[n]&&(u=={4}||u=={7}||u=={4,7})];Select[ Range[ 2200000],pf47Q] (* _Harvey P. Dale_, Jun 05 2013 *)
%Y A036318 Cf. A020465, A036302-A036325.
%K A036318 nonn,easy,base
%O A036318 1,1
%A A036318 _Patrick De Geest_, Dec 15 1998