|
| |
|
|
A083540
|
|
A083539[n] is a square; solutions x to sigma[x+1].sigma[x]=y^2 for some y.
|
|
1
| |
|
|
14, 30, 51, 161, 186, 206, 223, 329, 552, 713, 759, 869, 957, 994, 995, 1248, 1334, 1364, 1634, 1715, 1819, 2093, 2133, 2584, 2685, 2820, 2821, 2974, 3115, 3145, 3485, 4212, 4308, 4312, 4364, 4408, 4649
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
EXAMPLE
| x=30: sigma[30]=72, sigma[31]=32,product=72.32=256.9=24^2
|
|
|
MATHEMATICA
| Do[s=Sqrt[DivisorSigma[1, n+1]*DivisorSigma[1, n]]; If[IntegerQ[s], Print[n]], {n, 1, 5000}]
|
|
|
CROSSREFS
| Cf. A000203, A083539, A060780, A060781, A083538.
Sequence in context: A044456 A132759 A011257 * A027575 A104776 A101960
Adjacent sequences: A083537 A083538 A083539 * A083541 A083542 A083543
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Labos E. (labos(AT)ana.sote.hu), May 21 2003
|
| |
|
|
