login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Values of k corresponding to the terms of A185584.
1

%I #18 Nov 09 2018 20:36:58

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

%N Values of k corresponding to the terms of A185584.

%C Based on postings to the Sequence Fans Mailing List by _Claudio Meller_ and _Andrew Weimholt_, circa Feb 03 2011.

%t First generate the sequence A185584 using the program supplied there. Then apply this program to that sequence:

%t Position[Accumulate[Divisors[#]^2],#][[1,1]]&/@ {A185584}

%t (* _Harvey P. Dale_, Feb 05 2011 *)

%Y Cf. A185584.

%K nonn,more

%O 1,2

%A _N. J. A. Sloane_, Feb 05 2011

%E More terms from _Harvey P. Dale_, Feb 05 2011

%E a(8)-a(11) from _Donovan Johnson_, Feb 07 2011

%E a(12) from _Donovan Johnson_, Jan 20 2014