A128178 a(n) = A007376(8n+3).
3, 0, 4, 8, 2, 6, 0, 4, 8, 2, 6, 0, 4, 8, 2, 6, 0, 4, 8, 2, 6, 0, 4, 8, 1, 0, 1, 9, 1, 1, 7, 2, 1, 5, 2, 1, 3, 3, 1, 1, 4, 1, 9, 5, 1, 7, 6, 1, 5, 6, 1, 3, 7, 1, 1, 8, 1, 9, 9, 1, 7, 0, 2, 5, 0, 2, 3, 1, 2, 1, 2, 2, 9, 3, 2, 7, 4, 2, 5, 4, 2, 3, 5, 2, 1, 6, 2, 9, 7, 2, 7, 8, 2, 5, 8, 2, 3, 9, 2, 1, 0, 3, 9, 1, 3
Offset: 0
Crossrefs
Cf. A007376.
Programs
-
Mathematica
lim=104;A007376=Flatten[ IntegerDigits /@ Range[lim*8+3]]; Array[A007376[[8#+3]]&,lim+1,0] (* James C. McMahon, Jan 05 2025 *)