This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A165492 Primes p where the digital sum of p^2 is equal to 13. 7
 7, 29, 47, 61, 79, 151, 349, 389, 461, 601, 1051, 1249, 1429, 1451, 1789, 2239, 3499, 4799, 5011, 5101, 5501, 5749, 10501, 11149, 14249, 50101, 51001, 55001, 100501, 100649, 101149, 150001, 318751, 448999, 501001, 1009951, 5000011, 5000101, 5001001, 50000101 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS Vincenzo Librandi and Hiroaki Yamanouchi, Table of n, a(n) for n = 1..61 (terms a(1)-a(44) from Vincenzo Librandi) FORMULA {A000040(i) : A123157(i) = 13}. [R. J. Mathar, Sep 29 2009] EXAMPLE 29 is in the sequence because 29^2 = 841 and 8+4+1 = 13. 1789 is in the sequence because 1789^2 = 3200521 and 3+2+0+0+5+2+1 = 13. MATHEMATICA Select[Prime[Range[80000]], Total[IntegerDigits[#^2]]==13&]  (* Harvey P. Dale, Apr 08 2011 *) PROG (MAGMA) [p: p in PrimesUpTo(5*10^7) | &+Intseq(p^2) eq 13]; // Vincenzo Librandi, Sep 26 2015 CROSSREFS Cf. A165502 - A165504. Sequence in context: A075583 A103603 A045465 * A084201 A031380 A005698 Adjacent sequences:  A165489 A165490 A165491 * A165493 A165494 A165495 KEYWORD nonn,base AUTHOR Vincenzo Librandi, Sep 21 2009 EXTENSIONS More terms from R. J. Mathar, Sep 29 2009 a(37)-a(40) from Hiroaki Yamanouchi, Sep 23 2014 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified October 19 16:17 EDT 2019. Contains 328223 sequences. (Running on oeis4.)