OFFSET
1,1
COMMENTS
In other words, prime numbers p such that there are ten consecutive primes between p*100-100 and p*100, each of them in a different decade. (The P-div-10s are all different.) - Don Reble, May 02 2019
EXAMPLE
4073 is in the sequence, representing the prime sequence 407203, 407207, 407219, 407221, 407233, 407249, 407257, 407263, 407273, 407287, 407291, 407299, with 2 primes in decades 0 and 9, and 1 prime in decades 1 to 8. - R. J. Mathar, May 03 2019
MAPLE
isA307890 := proc(n)
local p, dec ;
if not isprime(n) then
false;
else
p := 100*(n-1) ;
p := prevprime(p+10) ;
for dec from 0 to 9 do
if modp(floor(p/10), 10) <> dec then
return false;
end if;
p := nextprime(p) ;
end do:
true ;
end if;
end proc:
for i from 1 do
p := ithprime(i) ;
if isA307890(p) then
printf("%d, \n", p) ;
end if;
end do: # R. J. Mathar, May 03 2019
CROSSREFS
KEYWORD
nonn,less
AUTHOR
Zak Seidov, Feb 27 2009
STATUS
approved