%I #12 Jul 23 2017 03:17:55
%S 0,1,1,3,2,5,4,3,8,9,5,7,10,5,7,3,2,11,17,1,20,21,11,19,12,17,14,17,
%T 18,19,18,23,28,27,11,19,15,7,2,21,40,25,31,1,19,15,9,31,46,47,10,15,
%U 43,23,14,9,17,19,18,41,24,27,50,3,14,29,13,3,4,39,21,1,47,19,31,13,6,17
%N Remainder when 3rd-order prime ppp(n) = A038580(n) is divided by n.
%H Michael De Vlieger, <a href="/A076243/b076243.txt">Table of n, a(n) for n = 1..10000</a>
%F a(n) = ppp(n) mod n = A038850(n) mod n.
%t MapIndexed[Mod[#1, First@ #2] &, Nest[Prime, Range@ 79, 3]] (* _Michael De Vlieger_, Jul 22 2017 *)
%Y Cf. A006450, A038580, A049090, A049203, A049202, A057809, A076240, A076241, A076242.
%K nonn
%O 1,4
%A _Labos Elemer_, Oct 08 2002
|