login
A273014
Least k such that A067128(k) is divisible by n.
2
1, 2, 3, 4, 7, 5, 17, 6, 9, 7, 33, 8, 49, 17, 12, 14, 67, 9, 104, 10, 17, 33, 161, 11, 31, 49, 20, 17, 249, 12, 273, 19, 33, 67, 27, 13, 318, 104, 49, 21, 324, 17, 405, 33, 18, 161, 538, 14, 142, 31, 67, 49, 586, 20, 33, 22, 104, 249, 721, 15, 766, 273, 29, 58, 49, 33, 1127, 67, 161, 27, 1252, 16, 1256, 318, 31, 104, 48, 49
OFFSET
1,2
LINKS
EXAMPLE
A067128(17) = 84. 84 is divisible by the 7. For any m < 17, A067128(m) is not divisible by 7, so a(7) = 17.
MATHEMATICA
a = {}; b = {0}; Do[If[# >= Max@ b, AppendTo[a, k] && AppendTo[b, #]] &@ DivisorSigma[0, k], {k, 10^7}]; Table[k = 1; While[! Divisible[a[[k]], n], k++]; k, {n, 22}] (* Michael De Vlieger, May 15 2016, for more terms use b-file data at A067128 *)
CROSSREFS
Sequence in context: A260426 A167151 A342621 * A336321 A359446 A072275
KEYWORD
nonn
AUTHOR
David A. Corneth, May 13 2016
EXTENSIONS
a(20)-a(64) from Peter J. C. Moses, May 13 2016
STATUS
approved