A097930 Numbers in base 10 that are palindromic in bases 5 and 6.
0, 1, 2, 3, 4, 67, 98, 104, 651, 2293, 3074, 26691, 27741, 704396, 723296, 755846, 883407, 48616624, 295979506, 297379006, 402327541, 198522549056, 204185363456, 240971251611, 246467321391, 303520083621, 330347455102
Offset: 1
Examples
27741_10 = 1341431_5; 27741_10 = 332233_6.
Links
- Giovanni Resta, Table of n, a(n) for n = 1..43 (first 29 terms from Robert G. Wilson v)
- Cino Hilliard, util.gp PARI Functions not in the PARI Library. [broken link]
- Cino Hilliard, Pari Utilities (cached)
Programs
-
Mathematica
Do[ p5 = IntegerDigits[n, 5]; If[ FromDigits[ Reverse[ p5]] == FromDigits[p5], p6 = IntegerDigits[n, 6]; If[ FromDigits[ Reverse[p6]] == FromDigits[p6], Print[n]]], {n, 10^8}] (* Robert G. Wilson v, Sep 07 2004 *)
-
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",")) ) }
Extensions
More terms from Robert G. Wilson v, Sep 07 2004
a(19)-a(27) from Donovan Johnson, Apr 23 2010
a(28) from Robert G. Wilson v, Jul 17 2015
Comments