login
This site is supported by donations to The OEIS Foundation.

 

Logo


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.

License Agreements, Terms of Use, Privacy Policy. .

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