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 A038615 #52 Jul 23 2025 00:26:29 %S A038615 2,3,5,11,13,19,23,29,31,41,43,53,59,61,83,89,101,103,109,113,131,139, %T A038615 149,151,163,181,191,193,199,211,223,229,233,239,241,251,263,269,281, %U A038615 283,293,311,313,331,349,353,359,383,389,401,409,419,421,431,433,439 %N A038615 Primes not containing the digit '7'. %C A038615 Subsequence of primes of A052419. - _Michel Marcus_, Feb 22 2015 %C A038615 Maynard proves that this sequence is infinite and in particular contains the expected number of elements up to x, on the order of x^(log 9/log 10)/log x. - _Charles R Greathouse IV_, Apr 08 2016 %H A038615 Alois P. Heinz, <a href="/A038615/b038615.txt">Table of n, a(n) for n = 1..20000</a> %H A038615 Marianne Freiberger, <a href="https://plus.maths.org/content/missing-7s">Primes without 7s</a>, +plus magazine, August 2016. %H A038615 M. F. Hasler, <a href="/wiki/Numbers_avoiding_certain_digits">Numbers avoiding certain digits</a>, OEIS wiki, Jan 12 2020. %H A038615 James Maynard, <a href="http://arxiv.org/abs/1604.01041">Primes with restricted digits</a>, arXiv:1604.01041 [math.NT], 2016. %H A038615 James Maynard and Brady Haran, <a href="https://www.youtube.com/watch?v=eeoBCS7IEqs">Primes without a 7</a>, Numberphile video (2019). %H A038615 <a href="/index/Pri#PrimesWithDigits">Index to entries for primes with digits in a given set</a> %F A038615 Intersection of A000040 (primes) and A052419 (numbers with no digit 7). - _M. F. Hasler_, Jan 11 2020 %F A038615 a(n) ~ n^(log 10/log 9) * log(n). - _Charles R Greathouse IV_, Aug 03 2023 %t A038615 Select[Prime[Range[70]], DigitCount[#, 10, 7] == 0 &] (* _Vincenzo Librandi_, Aug 08 2011 *) %o A038615 (Magma) [ p: p in PrimesUpTo(500) | not 7 in Intseq(p) ]; // _Bruno Berselli_, Aug 08 2011 %o A038615 (PARI) lista(nn)=forprime(p=2, nn, if (!vecsearch(vecsort(digits(p),,8), 7), print1(p, ", "));); \\ _Michel Marcus_, Feb 22 2015 %o A038615 (PARI) (A038615_upto(N)=select( is_A052419, primes([1,N])))(444) \\ i.e.: {is_A038615(n)=is_A052419(n)&&isprime(n)}; {is_A052419(n)=!setsearch(Set(digits(n)),7)}. - _M. F. Hasler_, Jan 11 2020 %Y A038615 Cf. A000040, A052419. %Y A038615 Primes having no digit d = 0..9 are A038618, A038603, A038604, A038611, A038612, A038613, A038614, this sequence, A038616, and A038617, respectively. %K A038615 nonn,easy,base %O A038615 1,1 %A A038615 Vasiliy Danilov (danilovv(AT)usa.net), Jul 15 1998 %E A038615 Offset corrected by _Arkadiusz Wesolowski_, Aug 07 2011