login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A029952 Palindromic in base 5. 23
0, 1, 2, 3, 4, 6, 12, 18, 24, 26, 31, 36, 41, 46, 52, 57, 62, 67, 72, 78, 83, 88, 93, 98, 104, 109, 114, 119, 124, 126, 156, 186, 216, 246, 252, 282, 312, 342, 372, 378, 408, 438, 468, 498, 504, 534, 564, 594, 624, 626, 651, 676, 701, 726, 756, 781, 806, 831 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,3

LINKS

T. D. Noe, Table of n, a(n) for n = 1..10000

P. De Geest, Palindromic numbers beyond base 10

MAPLE

# test for palindrome in base b, from N. J. A. Sloane, Sep 13 2015

b:=5;

ispal := proc(n) global b; local t1, t2, i;

if n <= b-1 then return(1); fi;

t1:=convert(n, base, b); t2:=nops(t1);

for i from 1 to floor(t2/2) do

if t1[i] <> t1[t2+1-1] then return(-1); fi;

od: return(1); end;

lis:=[]; for n from 0 to 100 do if ispal(n) = 1 then lis:=[op(lis), n]; fi; od: lis;

MATHEMATICA

f[n_, b_] := Module[{i=IntegerDigits[n, b]}, i==Reverse[i]]; lst={}; Do[If[f[n, 5], AppendTo[lst, n]], {n, 1000}]; lst (* Vladimir Joseph Stephan Orlovsky, Jul 08 2009 *)

PROG

(MAGMA) [n: n in [0..900] | Intseq(n, 5) eq Reverse(Intseq(n, 5))]; // Vincenzo Librandi, Sep 09 2015

CROSSREFS

Palindromes in bases 2 through 10: A006995, A014190, A014192, A029952, A029953, A029954, A029803, A029955, A002113.

Cf. A261917, A261918.

Sequence in context: A044816 A048302 A043708 * A048316 A037393 A048330

Adjacent sequences:  A029949 A029950 A029951 * A029953 A029954 A029955

KEYWORD

nonn,base

AUTHOR

Patrick De Geest

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified March 26 23:15 EDT 2017. Contains 284138 sequences.