|
|
A076528
|
|
Numbers n such that sigma(n) = sigma(n-1) - sigma(n-2).
|
|
2
|
|
|
955, 1301, 11143, 38215, 89485, 152155, 167785, 254137, 303281, 473317, 574717, 813921, 918081, 1307023, 2008361, 3676243, 9878245, 10368513, 12548755, 19411481, 22493263, 42413485, 77766487, 81513817, 157874001, 240828973
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
FORMULA
|
|
|
EXAMPLE
|
sigma(955) = 1152 sigma(954) = 2106 sigma(953) = 954 and 1152 = 2106 - 954; hence 955 is a term of the sequence.
|
|
MATHEMATICA
|
Select[Range[3, 10^5], DivisorSigma[1, # ] == DivisorSigma[1, # - 1] - DivisorSigma[1, # - 2] &]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|