This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A375010 #11 Nov 24 2024 01:43:22 %S A375010 0,0,0,1,0,1,0,0,2,-1,1,1,0,0,0,2,-1,1,1,-1,1,0,0,2,1,0,1,0,-3,4,0,2, %T A375010 -2,3,-1,0,1,0,0,2,-2,3,0,1,-3,0,3,1,0,0,2,-2,2,0,0,2,-1,1,1,-2,-1,4, %U A375010 1,0,-3,3,-1,3,0,0,0,1,0,1,0,0,2,-1,0,3,-2 %N A375010 a(n) = prime(n-1) - floor((prime(n-2) + prime(n-1) + prime(n)) / 3). %H A375010 Bill McEachen, <a href="/A375010/b375010.txt">Table of n, a(n) for n = 3..10002</a> %e A375010 For n=500001 a(n) = 7368787 - floor((7368743 + 7368787 + 7368791)/3) = 14. %t A375010 seq[len_] := (#[[2]] - Floor[Total[#]/3]) & /@ Partition[Prime[Range[len]], 3, 1]; seq[100] (* _Amiram Eldar_, Jul 27 2024 *) %K A375010 sign,easy %O A375010 3,9 %A A375010 _Bill McEachen_, Jul 27 2024