The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A332973 Solutions k of the equation usigma(k) = usigma(k-1) + usigma(k-2) where usigma(k) is the sum of unitary divisors of k (A034448). 2
 3, 42, 188970, 998670, 51670374, 91397154, 236280786, 259172826, 792554574, 1106710914, 1468869930, 1957827498, 2467823442, 2496238590, 3324585210, 4055970282, 4183629690, 4384566870, 13479861630, 20681058270, 29343074178, 43449285210, 68705958690, 71418085926 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS Giovanni Resta, Table of n, a(n) for n = 1..64 (terms < 10^13) EXAMPLE 42 is a term since s(42) = 96 and s(40) + s(41) = 54 + 42 = 96. MATHEMATICA usigma[1] = 1; usigma[n_] := Times @@ (1 + Power @@@ FactorInteger[n]); Select[Range[3, 10^8], usigma[#] == usigma[# - 1] + usigma[# - 2] &] PROG (PARI) usigma(k) = sumdivmult(k, d, if(gcd(d, k/d)==1, d)); \\ A034448 isok(k) = usigma(k) == usigma(k-1) + usigma(k-2); \\ Jinyuan Wang, Mar 08 2020 CROSSREFS The unitary version of A065900. Cf. A034448, A065557, A075565, A076136, A145469, A291126, A291176, A292033, A294995, A332974. Sequence in context: A058808 A155210 A157572 * A137192 A253577 A337213 Adjacent sequences:  A332970 A332971 A332972 * A332974 A332975 A332976 KEYWORD nonn AUTHOR Amiram Eldar, Mar 04 2020 EXTENSIONS Terms a(22) and beyond from Giovanni Resta, Mar 10 2020 STATUS approved

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

Last modified August 16 15:19 EDT 2022. Contains 356168 sequences. (Running on oeis4.)