login

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

a(n) == - prime(n) (modulo 20).
0

%I #4 Mar 30 2012 17:34:13

%S 18,17,15,13,9,7,3,1,17,11,9,3,19,17,13,7,1,19,13,9,7,1,17,11,3,19,17,

%T 13,11,7,13,9,3,1,11,9,3,17,13,7,1,19,9,7,3,1,9,17,13,11,7,1,19,9,3,

%U 17,11,9,3,19,17,7,13,9,7,3,9,3,13,11,7,1,13,7,1,17,11,3,19,11,1,19,9,7,1

%N a(n) == - prime(n) (modulo 20).

%t Table[ Mod[ -Prime[n], 20], {n, 1, 85} ]

%K nonn

%O 1,1

%A _Roger L. Bagula_, Oct 05 2002

%E Edited and extended by _Robert G. Wilson v_, Oct 07 2002