OFFSET
1,2
COMMENTS
Apparently, the sequence contains 1, odd primes and the elements of A020136. - R. J. Mathar, Jan 09 2011
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
MAPLE
select(n -> (2 &^ (2*n)-1 mod 2*n)-(2 &^(2*n-1) mod 2*n) = 1, [$1..1000]); # Robert Israel, Oct 25 2017
PROG
(PARI) isok(n) = (((2^(2*n)-1) % (2*n)) - (2^(2*n-1) % (2*n)) == 1) \\ Michel Marcus, Jul 25 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
Juri-Stepan Gerasimov, Jan 07 2011
STATUS
approved
