

A066781


a(n) = 2^phi(n).


12



2, 2, 4, 4, 16, 4, 64, 16, 64, 16, 1024, 16, 4096, 64, 256, 256, 65536, 64, 262144, 256, 4096, 1024, 4194304, 256, 1048576, 4096, 262144, 4096, 268435456, 256, 1073741824, 65536, 1048576, 65536, 16777216, 4096, 68719476736, 262144, 16777216, 65536
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


LINKS

Harry J. Smith, Table of n, a(n) for n = 1..300


MATHEMATICA

Table[2^EulerPhi[n], {n, 40}] (* Arkadiusz Wesolowski, Jan 16 2013 *)


PROG

(PARI) { for (n=1, 300, write("b066781.txt", n, " ", 2^eulerphi(n)) ) } \\ Harry J. Smith, Mar 25 2010


CROSSREFS

Sequence in context: A280306 A140723 A106051 * A112869 A086117 A095240
Adjacent sequences: A066778 A066779 A066780 * A066782 A066783 A066784


KEYWORD

nonn


AUTHOR

Benoit Cloitre, Jan 18 2002


STATUS

approved



