OFFSET
1,1
COMMENTS
The sequence consists largely of long runs of consecutive integers. However, there are also a few isolated integers such that the distance to both neighbor terms is greater than 1: 116, 4136, 4138, 4141, 4143, 4151, 6458, 63423, 100363.
EXAMPLE
3 is a term because prime(3) mod 3 = 5 mod 3 = 2 > 3/2;
4 is a term because prime(4) mod 4 = 7 mod 4 = 3 > 4/2;
9 is a term because prime(9) mod 9 = 23 mod 9 = 5 > 9/2.
MATHEMATICA
Select[Range[150], Mod[Prime[#], #]>#/2&] (* Harvey P. Dale, Jan 18 2011 *)
PROG
(PARI) for(n=1, 200, prime(n)%n>n/2&print1(n, ", "))
(Magma) [ n: n in [1..150] | NthPrime(n) mod n gt n/2 ];
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Dec 24 2010
STATUS
approved