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 A368873 #6 Jan 15 2024 11:14:27
%S A368873 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,95,131,181,250,345,476,657,907,1252,
%T A368873 1728,2385,3292,4544,6272,8657,11949,16493,22765,31422,43371,439373,
%U A368873 643932,943728,1383100,2027032,2970760,4353861,6380893,9351653,13705513,20086406,29438059
%N A368873 Number of compositions (ordered partitions) of n into nonprime parts not greater than sqrt(n).
%p A368873 b:= proc(n, t) option remember; `if`(n=0, 1, add(
%p A368873 `if`(isprime(j), 0, b(n-j, t)), j=1..min(n, t)))
%p A368873 end:
%p A368873 a:= n-> b(n, floor(sqrt(n))):
%p A368873 seq(a(n), n=0..47); # _Alois P. Heinz_, Jan 13 2024
%t A368873 Table[SeriesCoefficient[1/(1 - Sum[Boole[!PrimeQ[k]] x^k, {k, 1, Floor[Sqrt[n]]}]), {x, 0, n}], {n, 0, 47}]
%Y A368873 Cf. A052284, A364526.
%K A368873 nonn
%O A368873 0,17
%A A368873 _Ilya Gutkovskiy_, Jan 08 2024