

A046153


Primes of the form m*2^phi(m)1 with phi(m) the Euler function, in order of increasing m.


1



3, 11, 79, 23, 127, 191, 1114111, 1151, 5119, 6143, 654311423, 172031, 88774955854727217151, 1618481116086271, 107221699928436768767, 7421703487487, 120946279055359, 145135534866431, 47287796087390207
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


COMMENTS

Sorted along increasing n of the definition.


LINKS



MAPLE

with(numtheory); for n from 1 to 1000 do x := n*2^phi(n)1: if isprime(x) then print(x): fi:od:


MATHEMATICA



CROSSREFS



KEYWORD

nonn,nice


AUTHOR



EXTENSIONS



STATUS

approved



