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!)
A034049 Numbers with multiplicative digital root value 2. 17
2, 12, 21, 26, 34, 37, 43, 62, 73, 112, 121, 126, 134, 137, 143, 162, 173, 211, 216, 223, 232, 261, 278, 279, 287, 297, 299, 314, 317, 322, 341, 367, 369, 371, 376, 389, 396, 398, 413, 431, 447, 469, 474, 496, 612, 621, 637, 639, 649, 666, 673, 693, 694, 713 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

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

Eric Weisstein's World of Mathematics, Multiplicative Digital Root

Index entries for 10-automatic sequences.

MATHEMATICA

t = {}; n = 0; While[Length[t] < 100, n++; s = n; While[s > 10, s = Times @@ IntegerDigits[s]]; If[s == 2, AppendTo[t, n]]]; t (* T. D. Noe, Nov 15 2011 *)

PROG

(PARI) t(n) = {while(n>9, n=prod(i=1, #n=digits(n), n[i])); n};

for(n=0, 1e3, if(t(n) == 2, print1(n", "))); \\ Altug Alkan, Oct 19 2015

CROSSREFS

Cf. A031347.

Cf. A034048, A002275, A034049, A034050, A034051, A034052, A034053, A034054, A034055, A034056 (numbers having multiplicative digital roots 0-9).

Sequence in context: A231875 A031001 A048955 * A271361 A304813 A279424

Adjacent sequences:  A034046 A034047 A034048 * A034050 A034051 A034052

KEYWORD

nonn,base

AUTHOR

Patrick De Geest, Sep 15 1998

EXTENSIONS

Incorrect formula removed by Martin Renner, Oct 19 2015

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 April 19 02:19 EDT 2021. Contains 343105 sequences. (Running on oeis4.)