login
A115899
Numbers k such that phi(k) + prime(k) is a palindrome.
1
1, 2, 3, 4, 10, 15, 27, 30, 38, 39, 61, 62, 63, 64, 70, 72, 87, 96, 109, 123, 126, 137, 148, 153, 156, 202, 269, 286, 508, 716, 889, 1019, 1037, 1082, 1142, 1162, 1179, 1199, 1267, 1312, 1391, 1399, 1405, 1448, 1491, 1672, 1705, 1744, 1909, 1980
OFFSET
1,2
EXAMPLE
phi(1448) + prime(1448) = 720 + 12101 = 12821.
MATHEMATICA
Select[Range[2000], PalindromeQ[EulerPhi[#]+Prime[#]]&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Mar 30 2018 *)
CROSSREFS
Sequence in context: A095384 A177084 A362664 * A183527 A085934 A220402
KEYWORD
nonn,base
AUTHOR
Giovanni Resta, Feb 06 2006
STATUS
approved