A259380 - OEIS

A259380

Palindromic numbers in bases 2 and 8 written in base 10.

0, 1, 3, 5, 7, 9, 27, 45, 63, 65, 73, 195, 219, 325, 341, 365, 381, 455, 471, 495, 511, 513, 585, 1539, 1755, 2565, 2709, 2925, 3069, 3591, 3735, 3951, 4095, 4097, 4161, 4617, 4681, 12291, 12483, 13851, 14043, 20485, 20613, 20805, 20933, 21525, 21653, 21845, 21973, 23085, 23213, 23405, 23533, 24125, 24253, 24445, 24573, 28679, 28807, 28999, 29127, 29719, 29847

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,3

LINKS

Giovanni Resta, Table of n, a(n) for n = 1..10000

Index entries for sequences related to palindromes

FORMULA

Intersection of A006995 and A029803.

EXAMPLE

2709 is in the sequence because 2709_10 = 5225_8 = 101010010101_2.

MATHEMATICA

(* first load nthPalindromeBase from A002113 *) palQ[n_Integer, base_Integer] := Block[{}, Reverse[ idn = IntegerDigits[n, base]] == idn]; k = 0; lst = {}; While[k < 21000000, pp = nthPalindromeBase[k, 8]; If[palQ[pp, 2], AppendTo[lst, pp]; Print[pp]]; k++]; lst

b1=2; b2=8; lst={}; Do[d1=IntegerDigits[n, b1]; d2=IntegerDigits[n, b2]; If[d1==Reverse[d1]&&d2==Reverse[d2], AppendTo[lst, n]], {n, 0, 30000}]; lst (* Vincenzo Librandi, Jul 17 2015 *)

CROSSREFS

Cf. A048268, A060792, A097856, A097928, A182232, A259374, A097929, A182233, A259375, A259376,

A097930, A182234, A259377, A259378, A249156, A097931, A259380, A259381, A259382, A259383,

A259384, A099145, A259385, A259386, A259387, A259388, A259389, A259390, A099146, A007632,

A007633, A029961, A029962, A029963, A029964, A029804, A029965, A029966, A029967, A029968,

A029969, A029970, A029731, A097855, A250408, A250409, A250410, A250411, A099165, A250412.

Sequence in context: A135773 A357677 A262029 * A131668 A119252 A283003

Adjacent sequences: A259377 A259378 A259379 * A259381 A259382 A259383

KEYWORD

base,nonn

AUTHOR

Eric A. Schmidt and Robert G. Wilson v, Jul 16 2015

STATUS

approved