|
Search: id:A097930
|
|
|
| A097930 |
|
Numbers in base 10 that are palindromic in bases 5 and 6. |
|
+0
4
|
|
| 1, 2, 3, 4, 67, 98, 104, 651, 2293, 3074, 26691, 27741, 704396, 723296, 755846, 883407, 48616624
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
LINKS
|
Cino Hilliard, util.gp Pari Functions not in the Pari Librery.
|
|
EXAMPLE
|
27741 base 10 is 1341431 base 5
27741 base 10 is 332233 base 6
|
|
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}] (from Robert G. Wilson v Sep 07 2004)
|
|
PROGRAM
|
(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
|
Adjacent sequences: A097927 A097928 A097929 this_sequence A097931 A097932 A097933
Sequence in context: A096782 A098811 A004855 this_sequence A012322 A076519 A066776
|
|
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
|
|
|
Search completed in 0.002 seconds
|
