|
| |
|
|
A097928
|
|
Numbers in base 10 that are palindromic in bases 3 and 4.
|
|
3
| |
|
|
1, 2, 10, 130, 11950, 175850, 749470, 1181729, 11435450, 916821671, 956613659, 1136307905, 46746179770, 77887660577, 635913760790, 53903615484947, 55988454554339, 534479689454189, 1956592840355065, 2887846891280410
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
LINKS
| Cino Hilliard, util.gp PARI Functions not in the PARI Librery.
|
|
|
EXAMPLE
| 175850 base 10 is 22221012222 base 3
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}] (from Robert G. Wilson v Sep 07 2004)
|
|
|
PROG
| (PARI) \Requires reading the util.gp file in the link into the gp session. Place in the \.gprc file to automate. palbase(n, b1, b2) = { for(x=1, n, if(ispal(base(10, b1, x))& ispal(base(10, b2, x)), print1(x", ")) ) }
|
|
|
CROSSREFS
| Sequence in context: A011805 A194158 A111135 * A011838 A118183 A134051
Adjacent sequences: A097925 A097926 A097927 * A097929 A097930 A097931
|
|
|
KEYWORD
| base,nonn
|
|
|
AUTHOR
| Cino Hilliard (hillcino368(AT)gmail.com), Sep 04 2004
|
|
|
EXTENSIONS
| More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Sep 07 2004
a(10)-a(20) from Donovan Johnson (donovan.johnson(AT)yahoo.com), Apr 23 2010
|
| |
|
|
