A294574 Numbers having exactly one representation as sum of squares of primes.

4, 8, 9, 12, 13, 16, 17, 18, 20, 21, 22, 24, 26, 27, 28, 30, 31, 32, 35, 39

Offset

1,1

Links

Table of n, a(n) for n=1..20.

Index entries for sequences related to sums of squares

Formula

A090677(a(n)) = 1.

Mathematica

Flatten[Position[Rest[CoefficientList[Series[Product[1/(1 - x^(Prime[k]^2)), {k, 1, 5}], {x, 0, 40}], x]], 1]]

Crossrefs

Cf. A001248, A078135, A078136, A090677, A134755.

Sequence in context: A296696 A297129 A078137 * A010453 A078136 A291791

Adjacent sequences: A294571 A294572 A294573 * A294575 A294576 A294577

Keyword

nonn,fini,full

Author

Ilya Gutkovskiy, Nov 02 2017

Status

approved