A097928 Numbers in base 10 that are palindromic in bases 3 and 4.

0, 1, 2, 10, 130, 11950, 175850, 749470, 1181729, 11435450, 916821671, 956613659, 1136307905, 46746179770, 77887660577, 635913760790, 53903615484947, 55988454554339, 534479689454189, 1956592840355065

Offset: 1

Author

Cino Hilliard, Sep 04 2004

Keywords

• base
• nonn

Comments

Intersection of A014190 and A014192. - Michel Marcus, Oct 09 2014

Examples

			175850 base 10 is 22221012222 base 3 and 175850 base 10 is 222323222 base 4.
		

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)

Crossrefs

Cf. A014190 (base 3), A014192 (base 4).

Programs

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 *)

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.

Extensions

More terms from Robert G. Wilson v, Sep 07 2004

a(11)-a(21) from Donovan Johnson, Apr 23 2010