Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #12 Jul 03 2021 17:57:38
%S 1,2,3,6,9,17,18,21,34,38,42,51,63,102,114,126,147,153,289,294,306,
%T 342,357,441,578,646,714,722,798,867,882,1029,1071,1314,1734,1806,
%U 1842,1938,2058,2142,2166,2394,2499,2601,3087,4658,4913,4998,5202
%N Numbers k that divide s(k), where s(1)=1, s(j)=18*s(j-1)+j.
%H Harvey P. Dale, <a href="/A014868/b014868.txt">Table of n, a(n) for n = 1..230</a>
%t nxt[{s_,n_}]:={18s+n+1,n+1}; Transpose[Select[NestList[nxt,{1,1},5300], Divisible[ First[#],Last[#]]&]][[2]] (* _Harvey P. Dale_, Jun 11 2014 *)
%K nonn
%O 1,2
%A _N. J. A. Sloane_, _Olivier GĂ©rard_