OFFSET
1,2
COMMENTS
a(3k) = 0 for k>1 because if the digital sum is equal to a multiple of 3, then the number is divisible by 3. a(4) = 0 because any palindromic number whose digital sum is 4 is divisible by a number of the form 10^k + 1 for some k.
LINKS
Chai Wah Wu, Table of n, a(n) for n = 1..150
MATHEMATICA
a = Table[0, {75}]; Do[p = IntegerDigits[Prime[n]]; If[ Reverse[p] == p, q = Plus @ @ p; If[ a[[q]] == 0 && q < 76, a[[q]] = FromDigits[p]]], {n, 1, 10^7}]
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Amarnath Murthy, May 05 2002
EXTENSIONS
Edited, corrected and extended by Robert G. Wilson v, May 06 2002
STATUS
approved