A185873 Values of k corresponding to the terms of A185584.

1, 4, 11, 19, 31, 74, 65, 80, 107, 107, 107, 107

Offset: 1

Author

N. J. A. Sloane, Feb 05 2011

Keywords

• nonn
• more

Comments

Based on postings to the Sequence Fans Mailing List by Claudio Meller and Andrew Weimholt, circa Feb 03 2011.

Crossrefs

Cf. A185584.

Programs

Mathematica

First generate the sequence A185584 using the program supplied there.  Then apply this program to that sequence:
Position[Accumulate[Divisors[#]^2],#][[1,1]]&/@ {A185584}
(* Harvey P. Dale, Feb 05 2011 *)

Extensions

More terms from Harvey P. Dale, Feb 05 2011

a(8)-a(11) from Donovan Johnson, Feb 07 2011

a(12) from Donovan Johnson, Jan 20 2014