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 A257668 #34 Oct 30 2023 11:07:37 %S A257668 7,17,37,47,67,71,73,79,97,107,127,137,157,167,173,179,197,227,257, %T A257668 271,277,307,317,337,347,367,373,379,397,457,467,479,487,547,557,571, %U A257668 577,587,607,617,647,673,677,701,709,719,727,733,739,743,751,757,761 %N A257668 Primes containing a digit 7. %C A257668 Primes in A062675. %C A257668 Subsequence of primes of A011537. - _Michel Marcus_, May 03 2015 %H A257668 Shujing Lyu, <a href="/A257668/b257668.txt">Table of n, a(n) for n = 1..100000</a> %F A257668 a(n) ~ n log n. - _Charles R Greathouse IV_, Nov 01 2022 %e A257668 For n = 2, a(2) = 17 is the second prime containing a digit of 7. %t A257668 Select[Prime[Range[150]], ! StringFreeQ[ToString[#], "7"] &] %o A257668 (Magma) [p: p in PrimesUpTo(800) | 7 in Intseq(p)]; %o A257668 (Sage) [p for p in primes(800) if 7 in p.digits(base=10)] # _Bruno Berselli_, May 03 2015 %o A257668 (PARI) lista(nn) = forprime(p=2, nn, if(vecsearch(vecsort(digits(p)), 7), print1(p, ", "))); \\ _Altug Alkan_, Apr 21 2016; corrected by _Michel Marcus_, Oct 30 2023 %Y A257668 Cf. similar sequences listed in A257667. %Y A257668 Cf. A011537, A062675, A166579 (subsequence). %K A257668 nonn,base,easy %O A257668 1,1 %A A257668 _Vincenzo Librandi_, May 03 2015