|
Search: id:A158964
|
|
| |
| |
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
What is the first number n such that A160691(n) isn't in the set {1,2,6,8,12}?
|
|
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: A157105 A122711 A061332 this_sequence A157825 A102333 A157533
Adjacent sequences: A158961 A158962 A158963 this_sequence A158965 A158966 A158967
|
|
KEYWORD
|
more,nonn
|
|
AUTHOR
|
Farideh Firoozbakht (mymontain(AT)yahoo.com), May 29 2009
|
|
|
Search completed in 0.002 seconds
|
