login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

2 followed by list of composite numbers mod 10.
1

%I #11 Oct 30 2017 03:30:54

%S 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,

%T 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,

%U 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

%N 2 followed by list of composite numbers mod 10.

%H G. C. Greubel, <a href="/A088308/b088308.txt">Table of n, a(n) for n = 1..5000</a>

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

%Y A083786 is a better version. Cf. A002808.

%K nonn

%O 1,1

%A _Roger L. Bagula_, Nov 05 2003

%E Edited by _N. J. A. Sloane_, Mar 30 2006