|
Search: id:A069324
|
|
| |
|
| 13, 19, 31, 43, 61, 67, 73, 79, 97, 103, 109, 127, 139, 157
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
Differs from A040047 at the 13th term. - Kevin Buzzard (k.buzzard(AT)imperial.ac.uk), Jun 20 2008
|
|
EXAMPLE
|
a(4)=43 since the fourth prime in A068949 is 43.
|
|
PROGRAM
|
(PARI) disum(n)= { local(resul) ; resul=0 ; while(n>0, resul += n%10 ; n = (n-n%10)/10 ; ) ; return(resul) ; } A069324(maxs)= { local(ssqu, su) ; su=1 ; for(s=1, maxs, ssqu=s^2 ; if (disum(ssqu) > su, su=disum(ssqu) ; if( isprime(su), print1(su, ", ") ; ) ; ) ; ) ; } A069324(200000000) ; - R. J. Mathar (mathar(AT)strw.leidenunivlnl), May 19 2006
|
|
CROSSREFS
|
Cf. A068809, A068949, A068952, A040047.
Sequence in context: A167473 A085413 A164333 this_sequence A040047 A163847 A051644
Adjacent sequences: A069321 A069322 A069323 this_sequence A069325 A069326 A069327
|
|
KEYWORD
|
more,nonn
|
|
AUTHOR
|
Francois Jooste (phukraut(AT)hotmail.com), Mar 15 2002
|
|
EXTENSIONS
|
a(12) from R. J. Mathar (mathar(AT)strw.leidenunivlnl), May 19 2006
a(13)-a(14) from Kevin Buzzard (k.buzzard(AT)imperial.ac.uk), Jun 20 2008
|
|
|
Search completed in 0.002 seconds
|
