cp's OEIS Frontend

A262608 Primes p such that floor(10*p/Pi) mod 10 = 0.

%I A262608 #124 Dec 16 2015 00:07:48
%S A262608 19,41,107,151,173,239,283,349,421,443,487,509,619,641,751,773,839,
%T A262608 883,971,1087,1103,1109,1153,1307,1373,1439,1483,1549,1571,1637,1747,
%U A262608 1907,1951,1973,2017,2039,2083,2237,2281,2347,2551,2617,2683,2749,2837,2903,2969
%N A262608 Primes p such that floor(10*p/Pi) mod 10 = 0.
%C A262608 a(n) = A141855(n)   for  1 <= n <=  8;
%C A262608 a(n) = A141850(n-1) for  9 <= n <= 19;
%C A262608 a(n) = A141856(n-4) for 22 <= n <= 31;
%C A262608 a(n) = A141851(n-5) for 32 <= n <= 40;
%C A262608 a(n) = A141857(n-3) for 41 <= n <= 49.
%e A262608 19 is a term because floor(19*10/Pi) = 60 and 60 mod 10 = 0.
%t A262608 Select[Prime@ Range@ 432, Mod[Floor[10 #/Pi], 10] == 0 &] (* _Michael De Vlieger_, Dec 09 2015 *)
%o A262608 (PARI) forprime(p=2, 1e4, if (10*(p\Pi) == 10*p\Pi , print1(p", "))) \\ _Altug Alkan_, Sep 26 2015
%Y A262608 Cf. A000796, A141850, A141851, A141855, A141856, A141857.
%K A262608 nonn
%O A262608 1,1
%A A262608 _Giovanni Teofilatto_, Sep 26 2015
%E A262608 More terms and better definition from _Altug Alkan_, Sep 26 2015