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