|
| |
|
|
A062713
|
|
Numbers n such that sum of digits of n is a prime factor of n.
|
|
1
| |
|
|
2, 3, 5, 7, 12, 20, 21, 30, 50, 70, 102, 110, 111, 120, 133, 140, 200, 201, 209, 210, 230, 247, 300, 308, 320, 322, 364, 407, 410, 476, 481, 500, 506, 511, 605, 629, 700, 704, 715, 782, 803, 832, 874, 902, 935, 1002, 1010, 1011, 1015, 1020, 1040, 1066, 1088
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
LINKS
| Harry J. Smith, Table of n, a(n) for n=1,...,1000
|
|
|
EXAMPLE
| 2 is an element since 2 is a prime factor of 2; 12 is an element since 1 + 2 = 3 and 3 is a prime factor of 12.
|
|
|
PROG
| (PARI) SumD(x)= { s=0; while (x>9, s+=x-10*(x\10); x\=10); return(s + x) } { n=0; for (m=2, 10^5, s=SumD(m); f=factor(m)~; for (i=1, length(f), t=(s==f[1, i]); if (t, break)); if (t, write("b062713.txt", n++, " ", m); if (n==1000, break)) ) } [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Aug 09 2009]
|
|
|
CROSSREFS
| Sequence in context: A137713 A018065 A048818 * A086108 A052430 A177968
Adjacent sequences: A062710 A062711 A062712 * A062714 A062715 A062716
|
|
|
KEYWORD
| nonn,base,easy
|
|
|
AUTHOR
| Lisa O Coulter (lisa_coulter(AT)my-deja.com), Jul 14 2001
|
|
|
EXTENSIONS
| Corrected and extended by Larry Reeves (larryr(AT)acm.org) and Dean Hickerson, Jul 16 2001
|
| |
|
|
