OFFSET
1,2
MAPLE
with(numtheory): a := proc (n) if isprime(2*n-sigma(n)+tau(n)-1) = false then n else end if end proc: seq(a(n), n = 1 .. 200); # Emeric Deutsch, Jan 08 2009
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Omar E. Pol, Dec 14 2008
EXTENSIONS
Extended by Emeric Deutsch, Jan 08 2009
Name edited by Jon E. Schoenfield, Jan 06 2019
STATUS
approved