This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A064568 #39 Sep 28 2024 01:45:26 %S A064568 1,3,11,21,39,76,248,844,1520,2752,9317,17223,31221,57071,99741, %T A064568 589932,58056875,101769229,302890748,511561220,904036924,39488697700, %U A064568 325374626148,535755688021,1404720439053,3883018238329,6283167591179,16166305650060,25735985498861,40806937801472 %N A064568 n-th term in Recamán's sequence A005132 is divisible by n. %C A064568 No more terms < 4.61*10^11. - _Jud McCranie_, Dec 29 2019 %C A064568 No more terms < 6.46*10^13. - _James Ewens_, Sep 27 2024 %H A064568 <a href="/index/Rea#Recaman">Index entries for sequences related to Recamán's sequence</a> %e A064568 A005132(21) = 63, 63 is divisible by 21, so 21 is in the sequence. %t A064568 With[{s = Nest[Append[#1, If[And[#3 > 0, FreeQ[#1, #3]], #3, #1[[-1]] + #2]] & @@ {#1, #2, #1[[-1]] - #2} & @@ {#, Length@ #} &, {0}, 10^5]}, Reap[Do[If[Mod[s[[i]], i] == 0, Sow[i]], {i, Length@ s - 1}]][[-1, -1]]] (* _Michael De Vlieger_, Dec 29 2019 *) %Y A064568 Cf. A005132, A064569. %K A064568 nonn,more %O A064568 1,2 %A A064568 _N. J. A. Sloane_, Oct 16 2001 %E A064568 Offset changed, a(1), a(22)-a(23) from _Jud McCranie_, Dec 29 2019 %E A064568 a(24)-a(30) from _James Ewens_, Sep 27 2024