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 A022858 #8 May 22 2019 04:02:07
%S A022858 1,1,2,3,5,9,15,27,47,85,151,272,486,874,1569,2819,5063,9098,16345,
%T A022858 29369,52769,94817,170368,306125,550055,988364,1775934,3191079,
%U A022858 5733875,10302889,18512702,33264474,59771136,107399532,192980424
%N A022858 a(n) = [ a(n-1)/a(1) ] + [ a(n-2)/a(2) ] + ... + [ a(1)/a(n-1) ], for n >= 3.
%F A022858 a(n) ~ c * d^n, where d = 1.796846081832011885192668410985515255731636421943246338224794879636345148930..., c = 0.23857918741881541389297836615021092368805310388766212799501511093330834... - _Vaclav Kotesovec_, May 22 2019
%t A022858 Clear[a]; a[n_] := a[n] = If[n == 1, 1, Sum[Floor[a[n-k]/a[k]], {k, 1, n-1}]]; Table[a[n], {n, 1, 40}] (* _Vaclav Kotesovec_, May 22 2019 *)
%Y A022858 Cf. A022855, A022874.
%K A022858 nonn
%O A022858 1,3
%A A022858 _Clark Kimberling_