A038187 - OEIS

A038187

Numbers other than powers of 10 that are coprime to the sum of their digits.

11, 13, 14, 16, 17, 19, 23, 25, 29, 31, 32, 34, 35, 37, 38, 41, 43, 47, 49, 52, 53, 56, 58, 59, 61, 65, 67, 71, 73, 74, 76, 79, 83, 85, 89, 91, 92, 94, 95, 97, 98, 101, 103, 104, 106, 107, 109, 113, 115, 119, 121, 122, 124, 125, 127, 128, 131, 137, 139, 142, 143, 146, 148, 149, 151, 155, 157

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

Table of n, a(n) for n=1..67.

MATHEMATICA

cpQ[n_]:=Module[{td=Total[IntegerDigits[n]]}, td>1&&CoprimeQ[td, n]]; Select[Range[160], cpQ] (* Harvey P. Dale, Jun 11 2011 *)

CROSSREFS

Cf. A005349.

Sequence in context: A129917 A102577 A320427 * A007934 A111347 A026818

Adjacent sequences: A038184 A038185 A038186 * A038188 A038189 A038190

KEYWORD

easy,nonn,base

AUTHOR

Felice Russo

EXTENSIONS

Corrected and extended by Olivier Gérard

STATUS

approved