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 A119296 #23 Mar 04 2019 05:44:51 %S A119296 1,15,327,3904,47525,590450,7087898,79504457,887852429,9862623240, %T A119296 110885914721,1199346258292 %N A119296 Total number of 5's digits in the first 10^n primes. %e A119296 At a(2)=15 there are 15 5's digits in the first 10^2 primes. %p A119296 A119296 := proc(n) option remember: local k,s,lim: if(n=0)then return 0:fi: lim:=10^n: s:=procname(n-1): for k from 10^(n-1)+1 to lim do s:=s+nops([SearchAll("5",convert(ithprime(k),string))]): od: return s: end: seq(A119296(n),n=1..4); # _Nathaniel Johnston_, May 09 2011 %t A119296 Table[Total[DigitCount[#, 10, 5]&/@Prime[Range[10^n]]], {n, 7}] (* _Vincenzo Librandi_, Sep 09 2015 *) %Y A119296 Cf. A119290, A119291, A119292, A119293, A119294, A119295, A119297, A119298, A119299, A119300. %K A119296 more,nonn,base %O A119296 1,2 %A A119296 _Enoch Haga_, May 13 2006 %E A119296 Offset changed from 0 to 1 by _Nathaniel Johnston_, May 09 2011 %E A119296 a(8)-a(11) from _Robert Price_, Nov 05 2013 %E A119296 a(12) from _Marek Hubal_, Mar 04 2019