A114527 Numbers k such that A086793(k) is 1.

8, 14, 20, 26, 59, 62, 122, 123, 143, 149, 167, 206, 239, 257, 293, 302, 341, 347, 383, 419, 422, 491, 509, 563, 617, 653, 743, 761, 941, 1049, 1133, 1193, 1202, 1203, 1229, 1283, 1313, 1319, 1331, 1373, 1409, 1427, 1481, 1553, 1571, 1607

Offset: 1

Author

Zak Seidov, May 16 2006

Keywords

• nonn
• base

Comments

Prime numbers in the sequence are also primes with digit sum = 14 (A106756). - Zak Seidov, May 21 2006

Crossrefs

Cf. A034690, A086793, A106756.

Programs

Mathematica

ss={8,14};Do[If[15==Total@Flatten[IntegerDigits/@Divisors[n]],AppendTo[ss,n]],{n,20,2000}];ss (* Zak Seidov, May 21 2006 *)