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

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A045759 Maris-McGwire numbers: numbers k such that f(k) = f(k+1), where f(k) = sum of digits of k + sum of digits of prime factors of k (including multiplicities). 3
 7, 14, 43, 50, 61, 63, 67, 80, 84, 118, 122, 134, 137, 163, 196, 212, 213, 224, 241, 273, 274, 277, 279, 283, 351, 352, 373, 375, 390, 398, 421, 457, 462, 474, 475, 489, 495, 510, 516, 523, 526, 537, 547, 555, 558, 577, 584, 590, 592, 616, 638, 644, 660, 673, 687, 691 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS Amiram Eldar, Table of n, a(n) for n = 1..10000 EXAMPLE (61,62) is such a pair, hence the name. MATHEMATICA ds[n_] := Plus @@ IntegerDigits[n]; f[n_] := ds[n] + Total[(fi = FactorInteger[n])[[;; , 2]] *( ds /@fi[[;; , 1]])]; s={}; f1 = 1; Do[f2=f[n]; If[f1 == f2, AppendTo[s, n-1]]; f1 = f2, {n, 2, 700}]; s (* Amiram Eldar, Nov 24 2019 *) CROSSREFS Cf. A006145 (Ruth-Aaron numbers), A039945. Sequence in context: A189046 A098328 A062098 * A166637 A237686 A170918 Adjacent sequences:  A045756 A045757 A045758 * A045760 A045761 A045762 KEYWORD nonn,base AUTHOR Mike Keith (domnei(AT)aol.com) EXTENSIONS Corrected and extended by David W. Wilson Offset corrected by Amiram Eldar, Nov 24 2019 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.

Last modified May 27 21:49 EDT 2020. Contains 334671 sequences. (Running on oeis4.)