A273014 Least k such that A067128(k) is divisible by n.

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

Author

David A. Corneth, May 13 2016

Keywords

• nonn

Examples

			A067128(17) = 84. 84 is divisible by the 7. For any m < 17, A067128(m) is not divisible by 7, so a(7) = 17.
		

Links

• David A. Corneth, Table of n, a(n) for n = 1..178

Crossrefs

Cf. A034287, A067128.

Programs

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 *)

Extensions

a(20)-a(64) from Peter J. C. Moses, May 13 2016