A088308 2 followed by list of composite numbers mod 10.
2, 4, 6, 8, 9, 0, 2, 4, 5, 6, 8, 0, 1, 2, 4, 5, 6, 7, 8, 0, 2, 3, 4, 5, 6, 8, 9, 0, 2, 4, 5, 6, 8, 9, 0, 1, 2, 4, 5, 6, 7, 8, 0, 2, 3, 4, 5, 6, 8, 9, 0, 2, 4, 5, 6, 7, 8, 0, 1, 2, 4, 5, 6, 7, 8, 0, 1, 2, 3, 4, 5, 6, 8, 9, 0, 2, 4, 5, 6, 8, 0, 1, 2, 4, 5, 6, 7, 8, 9, 0, 1, 2, 3, 4, 5, 6, 8, 9, 0, 2, 3, 4, 5, 6, 8
Offset: 1
Keywords
Links
- G. C. Greubel, Table of n, a(n) for n = 1..5000
Programs
-
Mathematica
Join[{2}, Mod[Rest@Select[Range@500, ! PrimeQ@# &], 10]] (* G. C. Greubel, Oct 29 2017 *)
Extensions
Edited by N. J. A. Sloane, Mar 30 2006