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,1

Links

G. C. Greubel, Table of n, a(n) for n = 1..5000

Mathematica

Join[{2}, Mod[Rest@Select[Range@500, ! PrimeQ@# &], 10]] (* G. C. Greubel, Oct 29 2017 *)

Crossrefs

A083786 is a better version. Cf. A002808.

Sequence in context: A062355 A366602 A087671 * A167832 A134488 A263800

Adjacent sequences: A088305 A088306 A088307 * A088309 A088310 A088311

Keyword

nonn

Author

Roger L. Bagula, Nov 05 2003

Extensions

Edited by N. J. A. Sloane, Mar 30 2006

Status

approved