|
%I #11 Oct 15 2013 22:31:32
%S 1,2,1,3,6,10,5,8,17,19,27,31,38,35,28,39,17,17,10,38,68,63,13,55,48,
%T 4,74,100,37,29,47,121,115,136,105,28,128,109,159,90,114,31,151,4,86,
%U 108,81,147,149,189,185,119,231,166,88,238,197,233,64,186,258,111,128,260
%N Remainder when 3rd order prime A038580(n) is divided by n-th prime=A000040(n).
%H Vincenzo Librandi, <a href="/A076242/b076242.txt">Table of n, a(n) for n = 1..1000</a>
%F a(n) = Mod[A038580(n), A000040(n)]
%t Table[Mod[Prime[Prime[Prime[n]]],Prime[n]],{n,70}] (* _Harvey P. Dale_, Sep 28 2013 *)
%Y Cf. A006450, A038580, A049090, A049203, A049202, A057809, A076240-A076243.
%K nonn,less
%O 1,2
%A _Labos Elemer_, Oct 08 2002
|
