A071703 Number of ways to represent the n-th prime as arithmetic mean of three odd primes.

0, 1, 2, 4, 8, 10, 14, 16, 20, 28, 32, 36, 47, 45, 48, 58, 68, 74, 81, 95, 88, 101, 108, 119, 134, 146, 143, 150, 161, 161, 195, 208, 215, 222, 244, 257, 259, 269, 283, 293, 319, 332, 354, 346, 359, 365, 417, 426, 442, 455, 454, 500, 497, 526

Offset

1,3

Links

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

Example

a(4)=4 as A000040(4)=7 and there are no more representations than 7 = (3+5+13)/3 = (3+7+11)/3 = (5+5+11)/3 = (7+7+7)/3.

Prog

(Haskell)
a071703 = z a065091_list 0 . (* 3) . a000040 where
   z _ 3 m = fromEnum (m == 0)
   z ps'@(p:ps) i m = if m < p then 0 else z ps' (i+1) (m - p) + z ps i m
-- Reinhard Zumkeller, May 24 2015

Crossrefs

Cf. A071681, A071704.

Cf. A010051, A000040, A065091.

Sequence in context: A087505 A086801 A154115 * A010069 A360912 A226872

Adjacent sequences: A071700 A071701 A071702 * A071704 A071705 A071706

Keyword

nonn

Author

Reinhard Zumkeller, Jun 03 2002

Extensions

Definition, initial term and example corrected. Thanks to Zak Seidov, who found the mistake. - Reinhard Zumkeller, May 24 2015

Status

approved