A127414 a(n) = A007376(4*n+1).

1, 5, 9, 1, 3, 5, 7, 9, 1, 3, 5, 7, 9, 1, 3, 5, 7, 9, 1, 3, 5, 7, 9, 1, 3, 5, 7, 9, 1, 3, 5, 7, 9, 1, 3, 5, 7, 9, 1, 3, 5, 7, 9, 1, 3, 5, 7, 9, 1, 0, 3, 1, 0, 7, 1, 1, 1, 1, 1, 5, 1, 1, 9, 1, 2, 3, 1, 2, 7, 1, 3, 1, 1, 3, 5, 1, 3, 9, 1, 4, 3, 1, 4, 7, 1, 5, 1, 1, 5, 5, 1, 5, 9, 1, 6, 3, 1, 6, 7, 1, 7, 1, 1, 7, 5

Offset: 0

Author

N. J. A. Sloane, Jul 23 2008

Keywords

• nonn
• base

Programs

Mathematica

A007376=Flatten[ IntegerDigits/@Range@ 500] ;Array[A007376[[4#+1]]&,105,0] (* James C. McMahon, Dec 31 2024 *)