login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A160947 Numbers k that are multiples of the digital sum of k+1. 3
9, 10, 12, 16, 40, 42, 55, 90, 96, 99, 100, 105, 120, 130, 154, 156, 160, 180, 187, 220, 231, 232, 238, 253, 270, 273, 300, 304, 310, 352, 360, 364, 384, 390, 400, 420, 450, 451, 490, 493, 507, 520, 528, 540, 550, 598, 609, 616, 624, 630, 646, 649, 672, 684 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Muniru A Asiru, Table of n, a(n) for n = 1..1900

EXAMPLE

232 is in the sequence because 232 = 29 * ds(233) = 29*8.

684 is in the sequence because 684 = 36 * ds(685) = 36*19.

MAPLE

select(n->frac(n/convert(convert(n+1, base, 10), `+`))=0, [$1..684]);

# Paolo P. Lava, Apr 17 2018

MATHEMATICA

Select[Range[800], Divisible[#, Total[IntegerDigits[# + 1]]] &] (* Vincenzo Librandi, Apr 18 2018 *)

PROG

(PARI) isok(n) = !(n % sumdigits(n+1)); \\ Michel Marcus, Apr 17 2018

(GAP) a:=List(Filtered(List([1..700], m->[m, List(List(List([1..m], n->n+1), ListOfDigits), Sum)[m]]), i->i[1] mod i[2]=0), j->j[1]); # Muniru A Asiru, Apr 17 2018

(MAGMA) [n: n in [1..800] | n mod &+Intseq(n+1) eq 0]; // Vincenzo Librandi, Apr 18 2018

CROSSREFS

Cf. A007953, A160948.

Sequence in context: A048592 A190665 A242475 * A158581 A343258 A078459

Adjacent sequences:  A160944 A160945 A160946 * A160948 A160949 A160950

KEYWORD

nonn,base

AUTHOR

Claudio Meller, May 30 2009

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified June 16 09:57 EDT 2021. Contains 345056 sequences. (Running on oeis4.)