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.

A087531 Primes consisting only of digits 3 and 7 occurring with equal frequency.

This page as a plain text file.
%I A087531 #14 Sep 20 2024 23:54:56
%S A087531 37,73,33373777,33773737,37373773,37377337,73337377,73337773,73373737,
%T A087531 73773373,77337373,77733373,3337737737,3337777337,3377733773,
%U A087531 3733377377,3733733777,3737733773,3773333777,3773337377,3773733737,3777333773,3777337337,3777337373
%N A087531 Primes consisting only of digits 3 and 7 occurring with equal frequency.
%C A087531 There are 18 digit pairs which can produce such primes. (1,0),(1,3),(1,4),(1,6),(1,7),(1,9),(2,3),(2,9),(3,4),(3,5),(3,7),(3,8),(4,7),(4,9),(5,9),(6,7),(7,9),(8,9).
%H A087531 Andrew Howroyd, <a href="/A087531/b087531.txt">Table of n, a(n) for n = 1..9185</a>
%t A087531 Select[Flatten[Table[FromDigits/@Permutations[Join[Table[3, {i}], Table[7, {i}]]], {i, 7}]], PrimeQ] (* from _Harvey P. Dale_ *)
%o A087531 (PARI) \\ Needs B() from A087510.
%o A087531 concat(vector(6,k,B(k,3,7,isprime))) \\ _Andrew Howroyd_, Sep 20 2024
%Y A087531 Cf. A087510, A087511, A087530.
%K A087531 base,nonn
%O A087531 1,1
%A A087531 _Amarnath Murthy_ and _Paul D. Hanna_, Sep 12 2003
%E A087531 Edited by _Charles R Greathouse IV_, Oct 28 2009
%E A087531 Offset changed and a(23) onwards from _Andrew Howroyd_, Sep 20 2024