Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).
%I #8 Jul 06 2018 09:47:34
%S 4,5,6,7,8,9,10,14,15,16,17,18,19,20,21,24,25,26,27,28,29,34,35,36,37,
%T 38,39,40,43,44,45,46,47,48,49,50,51,53,54,55,56,57,62,63,64,65,66,67,
%U 68,72,73,74,75,76,77,78,79,81,82,83,84,85,86,87,91,92
%N Numbers not representable as the sum of three 11-gonal numbers.
%C It is conjectured that 12453 positive numbers are not the sum of three 11-gonal numbers.
%D R. K. Guy, Unsolved Problems in Number Theory, D3.
%H T. D. Noe, <a href="/A214420/b214420.txt">Table of n, a(n) for n = 1..12453</a>
%H R. K. Guy, <a href="https://www.jstor.org/stable/2324367">Every number is expressible as the sum of how many polygonal numbers?</a>, Amer. Math. Monthly 101 (1994), 169-172.
%t nn = 900; hen = Table[n*(9*n-7)/2, {n, 0, nn}]; t = Table[0, {hen[[-1]]}]; Do[n = hen[[i]] + hen[[j]] + hen[[k]]; If[n <= hen[[-1]], t[[n]] = 1], {i, nn}, {j, i, nn}, {k, j, nn}]; Flatten[Position[t, 0]]
%Y Cf. A051682 (11-gonal numbers).
%Y Cf. A118278, A118279.
%K nonn,fini
%O 1,1
%A _T. D. Noe_, Jul 17 2012