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 A022874 #16 Feb 11 2025 16:36:40
%S A022874 2,1,1,2,6,19,60,194,628,2035,6597,21393,69382,225031,729865,2367255,
%T A022874 7678002,24902998,80770936,261974262,849693202,2755914018,8938593456,
%U A022874 28991634898,94032120191,304985891949,989198096368
%N A022874 a(n) = [ a(n-1)/a(1) ] + [ a(n-1)/a(2) ] + ... + [ a(n-1)/a(n-1) ] for n >= 3, with initial terms 2,1.
%F A022874 a(n) ~ c * d^n, where d = 3.243422474587042277724011259031636390127037162673948731178241793178427249639..., c = 0.015782950162188139059124323554918048406538374877378493529663483700401917... - _Vaclav Kotesovec_, May 22 2019
%t A022874 Clear[a]; a[n_] := a[n] = If[n==1, 2, Sum[Floor[a[n-1]/a[k]], {k, 1, n-1}]]; Table[a[n], {n, 1, 30}] (* _Vaclav Kotesovec_, May 22 2019 *)
%Y A022874 Cf. A022855, A022858.
%K A022874 nonn
%O A022874 1,1
%A A022874 _Clark Kimberling_
%E A022874 a(26) corrected by _Sean A. Irvine_, May 22 2019
%E A022874 Name clarified by _Robert C. Lyons_, Feb 11 2025