%I #7 Mar 05 2024 12:40:38
%S 5,17,19,23,41,47,53,59,71,89,103,107,109,113,131,149,167,173,179,197,
%T 223,229,233,239,251,257,269,271,283,293,311,313,317,337,347,349,359,
%U 383,397,401,419,431,439,449,457,467,479,491,503,509,521,523,547,557
%N Primes not expressible as the sum of two triangular numbers.
%t Complement[ Prime@ Range@115, Union@ Flatten@ Table[i(i + 1)/2 + j(j + 1)/2, {i, 35}, {j, 0, i}]] (* _Robert G. Wilson v_, Apr 27 2006 *)
%Y Cf. A000040, A117112.
%K easy,nonn
%O 0,1
%A _Greg Huber_, Apr 24 2006
%E More terms from _Robert G. Wilson v_, Apr 27 2006
|