|
%I #8 Sep 08 2022 08:45:49
%S 11,13,17,19,29,37,59,67,89,97,149,157,239,269,307,337,359,367,397,
%T 419,449,487,509,547,569,659,757,787,839,907,967,997,1117,1259,1289,
%U 1319,1409,1559,1567,1657,1747,1867,1949,1987,2099,2287,2309,2339,2399,2437,2459
%N Primes p such that floor(p/5) is also prime.
%H Vincenzo Librandi, <a href="/A168446/b168446.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Prime[Range[6! ]],PrimeQ[Floor[ #/5]]&]
%o (Magma) [p: p in PrimesUpTo(2500) | IsPrime(Floor(p/5))]; // _Vincenzo Librandi_, Apr 16 2013
%Y Cf. A075519, A168447.
%K nonn,easy
%O 1,1
%A _Vladimir Joseph Stephan Orlovsky_, Nov 25 2009
%E Definition and values corrected by _R. J. Mathar_, Dec 06 2009
|
