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 A286970 #6 Feb 16 2025 08:33:46
%S A286970 1,0,1,1,1,3,2,6,6,10,16,20,35,45,72,103,150,228,324,491,710,1053,
%T A286970 1552,2272,3369,4930,7288,10711,15771,23244,34175,50382,74113,109168,
%U A286970 160722,236596,348446,512894,755303,1111946,1637205,2410592,3549023,5225659,7693623,11327912
%N A286970 Number of compositions (ordered partitions) of n into decimal palindromic primes (A002385).
%H A286970 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/PalindromicPrime.html">Palindromic Prime</a>
%H A286970 <a href="/index/Pac#palindromes">Index entries for sequences related to palindromes</a>
%H A286970 <a href="/index/Com#comp">Index entries for sequences related to compositions</a>
%F A286970 G.f.: 1/(1 - Sum_{k>=1} x^A002385(k)).
%e A286970 a(7) = 6 because we have [7], [5, 2], [3, 2, 2], [2, 5], [2, 3, 2] and [2, 2, 3].
%t A286970 nmax = 45; CoefficientList[Series[1/(1 - Sum[Boole[PalindromeQ[k] && PrimeQ[k]] x^k, {k, 1, nmax}]), {x, 0, nmax}], x]
%Y A286970 Cf. A002385, A023360, A282584.
%K A286970 nonn,base
%O A286970 0,6
%A A286970 _Ilya Gutkovskiy_, May 17 2017