A243305 a(n) = 2^phi(n)+1 = A066781(n)+1.
3, 3, 5, 5, 17, 5, 65, 17, 65, 17, 1025, 17, 4097, 65, 257, 257, 65537, 65, 262145, 257, 4097, 1025, 4194305, 257, 1048577, 4097, 262145, 4097, 268435457, 257, 1073741825, 65537, 1048577, 65537, 16777217, 4097, 68719476737, 262145, 16777217, 65537, 1099511627777
Offset: 1
Keywords
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[2^EulerPhi(n)+1: n in [1..41]];
-
Maple
with(numtheory); A243305:=n->2^phi(n)+1; seq(A243305(n), n=1..50); # Wesley Ivan Hurt, Jun 04 2014
-
Mathematica
Table[2^EulerPhi[n] + 1, {n, 1, 50}]
Formula
a(n) = 2^A000010(n) + 1. - Wesley Ivan Hurt, Jun 04 2014