OFFSET
1,3
COMMENTS
LINKS
Ray Chandler, Table of n, a(n) for n = 1..27 (terms < 10^18)
Cino Hilliard, util.gp PARI Functions not in the PARI Library. [broken link]
Cino Hilliard, Pari Utilities (cached)
EXAMPLE
175850 base 10 is 22221012222 base 3 and 175850 base 10 is 222323222 base 4.
MATHEMATICA
Do[ p3 = IntegerDigits[n, 3]; If[ FromDigits[ Reverse[ p3]] == FromDigits[p3], p4 = IntegerDigits[n, 4]; If[ FromDigits[ Reverse[p4]] == FromDigits[p4], Print[n]]], {n, 2*10^7}] (* Robert G. Wilson v, Sep 07 2004 *)
PROG
(PARI) palbase(n, b1, b2) = { for(x=1, n, if(ispal(base(10, b1, x))& ispal(base(10, b2, x)), print1(x", ")) ) } \\Requires reading the util.gp file in the link into the gp session. Place in the \.gprc file to automate.
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Cino Hilliard, Sep 04 2004
EXTENSIONS
More terms from Robert G. Wilson v, Sep 07 2004
a(11)-a(21) from Donovan Johnson, Apr 23 2010
STATUS
approved