OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
FORMULA
EXAMPLE
From Muniru A Asiru, Jan 23 2018: (Start)
phi(1) = 1 -> a(1) = 2^1 + 1 = 3.
phi(2) = 1 -> a(2) = 2^1 + 1 = 3.
phi(7) = 6 -> a(7) = 2^6 + 6 = 70.
phi(10) = 4 -> a(10) = 2^4 + 4 = 20.
(End)
MAPLE
with(numtheory); A243307:=n->2^phi(n)+phi(n); seq(A243307(n), n=1..50); # Wesley Ivan Hurt, Jun 04 2014
MATHEMATICA
Table[2^EulerPhi[n] + EulerPhi[n], {n, 1, 50}]
PROG
(Magma) [2^EulerPhi(n)+EulerPhi(n): n in [1..40]];
(GAP) List([1..1000], n -> 2^Phi(n) + Phi(n)); # Muniru A Asiru, Jan 23 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
Vincenzo Librandi, Jun 04 2014
STATUS
approved