A158964 Numbers n such that A160691(n) = A160691(n+1) = A160691(n+2) = 8.

107486, 126785, 160804, 162574, 200559, 222165, 265520, 290313, 315707, 318773, 374503, 375852, 381663, 411843, 414979, 420016, 440389, 451070, 451637, 456681, 469794, 488232, 500727, 503603, 510728, 521342, 522953, 525526, 526171, 536413, 541116, 552763, 553368, 555582

Offset

1,1

Comments

The first triples with value 2, 4, 6, 8 are for n=2, 18, 344349, 107486. - Michel Marcus, Sep 07 2017

Links

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

Mathematica

d[n_]:=DivisorSigma[0, m]; c[1]=1; c[n_]:=c[n]=(s=Sum[c[k], {k, n-1}]; For[m=1, d[m] !=
d[s+m], m++ ]; m); Do[If[d[c[n]]==d[c[n+1]]==d[c[n+2]]==8, Print[n]], {n, 223000}]

Crossrefs

Cf. A158963, A160689, A160690, A160691.

Sequence in context: A061332 A237866 A204875 * A248446 A202404 A203882

Adjacent sequences: A158961 A158962 A158963 * A158965 A158966 A158967

Keyword

nonn

Author

Farideh Firoozbakht, May 29 2009

Extensions

More terms from Michel Marcus, Sep 05 2017

Status

approved