Logo

Greetings from The On-Line Encyclopedia of Integer Sequences!

Hints

Search: id:A107288
Displaying 1-1 of 1 results found. page 1
     Format: long | short | internal | text      Sort: relevance | references | number      Highlight: on | off
A107288 Primes whose digit sum is a square. +0
3
13, 31, 79, 97, 103, 211, 277, 349, 367, 439, 457, 547, 619, 673, 691, 709, 727, 853, 907, 997, 1021, 1069, 1087, 1201, 1249, 1429, 1447, 1483, 1609, 1627, 1663, 1699, 1753, 1789, 1861, 1879, 1933, 1951, 1987, 2011, 2239, 2293, 2347, 2383, 2437, 2473 (list; graph; listen)
OFFSET

1,1

MATHEMATICA

bb={}; Do[If[IntegerQ[Sqrt[Apply[Plus, IntegerDigits[p=Prime[n]]]]], bb=Append[bb, p]], {n, 500}]; bb

CROSSREFS

Sequence in context: A061239 A072023 A158723 this_sequence A095379 A160772 A039403

Adjacent sequences: A107285 A107286 A107287 this_sequence A107289 A107290 A107291

KEYWORD

nonn,base

AUTHOR

Zak Seidov (zakseidov(AT)yahoo.com), May 20 2005

page 1

Search completed in 0.002 seconds

Lookup | Welcome | Find friends | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
More pages | Superseeker | Maintained by N. J. A. Sloane (njas@research.att.com)

Last modified November 27 22:38 EST 2009. Contains 167602 sequences.


AT&T Labs Research