OFFSET
3,9
EXAMPLE
For n=500001 a(n) = 7368787 - floor((7368743 + 7368787 + 7368791)/3) = 14.
MATHEMATICA
seq[len_] := (#[[2]] - Floor[Total[#]/3]) & /@ Partition[Prime[Range[len]], 3, 1]; seq[100] (* Amiram Eldar, Jul 27 2024 *)
CROSSREFS
KEYWORD
sign,easy
AUTHOR
Bill McEachen, Jul 27 2024
STATUS
approved