A248142 Least positive integer m such that m + n divides A(m) + A(n), where A(.) is given by A005259.

1, 1, 7, 2238, 5, 9, 3, 3, 1, 2484, 2, 2, 26, 12, 24, 5, 41, 32, 14, 3, 29, 29, 6, 15, 30, 7, 8, 37, 21, 5, 44, 18, 5, 16, 39, 34, 8, 1, 6, 5, 17, 8, 26, 6, 865, 39, 8, 13, 16, 781, 356, 35, 184, 65, 30, 139, 18, 25, 16, 123

Offset

1,3

Comments

Conjecture: a(n) exists for any n > 0.

Links

Zhi-Wei Sun, Table of n, a(n) for n = 1..2853

Example

 a(3) = 7 since 3 + 7 = 10 divides A(3) + A(7) = 1445 + 584307365 = 584308810.

Mathematica

A[0]=1; A[1]=5
A[n_]:=((2n-1)(17*n(n-1)+5)*A[n-1]-(n-1)^3*A[n-2])/n^3
Do[m=1; Label[aa]; If[Mod[A[m]+A[n], m+n]==0, Print[n, " ", m]; Goto[bb]]; m=m+1; Goto[aa]; Label[bb]; Continue, {n, 1, 60}]

Crossrefs

Cf. A005259, A247824, A247937, A247940, A248124, A248125, A248133, A248136, A248137, A248139.

Sequence in context: A129732 A186164 A203686 * A216472 A065505 A067511

Adjacent sequences: A248139 A248140 A248141 * A248143 A248144 A248145

Keyword

nonn

Author

Zhi-Wei Sun, Oct 02 2014

Status

approved