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 A110741 #10 May 22 2025 04:40:25 %S A110741 2,11,3,13,31,103,211,1021,1201,2011,3001,5,23,41,113,131,311,401, %T A110741 1013,1031,1103,1301,2003,2111,3011,4001,10103,10211,10301,11003, %U A110741 12011,12101,13001,20021,20201,21011,21101,30011,7,43,61,151,223,241,313,331,421 %N A110741 Primes with at most n digits and a digit sum n in ascending order. 2,11; 3; 13,31,103,211,1021,2011,3001; 5,23,41,113,... %p A110741 A007953 := proc(n) add(i,i=convert(n,base,10)) ; end: A110741 := proc(nmin) local a,n,p ; a := [] ; n := 2; while nops(a) < nmin do p := 2 ; while p < 10^n do if A007953(p) = n then a := [op(a),p] ; fi ; p := nextprime(p) ; od ; n := n+1 ; od; RETURN(a) ; end: A110741(40) ; # _R. J. Mathar_, Aug 17 2007 %Y A110741 Cf. A110742, A113625. %K A110741 base,easy,nonn %O A110741 2,1 %A A110741 _Amarnath Murthy_, Aug 10 2005 %E A110741 More terms from _R. J. Mathar_, Aug 17 2007