A286970 Number of compositions (ordered partitions) of n into decimal palindromic primes (A002385).
1, 0, 1, 1, 1, 3, 2, 6, 6, 10, 16, 20, 35, 45, 72, 103, 150, 228, 324, 491, 710, 1053, 1552, 2272, 3369, 4930, 7288, 10711, 15771, 23244, 34175, 50382, 74113, 109168, 160722, 236596, 348446, 512894, 755303, 1111946, 1637205, 2410592, 3549023, 5225659, 7693623, 11327912
Offset: 0
Examples
a(7) = 6 because we have [7], [5, 2], [3, 2, 2], [2, 5], [2, 3, 2] and [2, 2, 3].
Links
- Eric Weisstein's World of Mathematics, Palindromic Prime
- Index entries for sequences related to palindromes
- Index entries for sequences related to compositions
Programs
-
Mathematica
nmax = 45; CoefficientList[Series[1/(1 - Sum[Boole[PalindromeQ[k] && PrimeQ[k]] x^k, {k, 1, nmax}]), {x, 0, nmax}], x]
Formula
G.f.: 1/(1 - Sum_{k>=1} x^A002385(k)).