A138131 Palindromic cyclops numbers.

0, 101, 202, 303, 404, 505, 606, 707, 808, 909, 11011, 12021, 13031, 14041, 15051, 16061, 17071, 18081, 19091, 21012, 22022, 23032, 24042, 25052, 26062, 27072, 28082, 29092, 31013, 32023, 33033, 34043, 35053, 36063, 37073, 38083

Offset: 1

Author

Omar E. Pol, Mar 09 2008

Keywords

• base
• easy
• nonn

Comments

For prime entries in the sequence see A136098. - Lekraj Beedassy, Mar 15 2008, May 21 2008

Examples

			101 is a member because 101 is a palindromic number A002113 and also a cyclops number A134808.
		

Links

• Robert Israel, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A002113, A002385, A134808.

Programs

Maple

f:= proc(n,d) local L,m,k;
  L:= convert(9^d+n,base,9);
  add((1+L[d+1-i])*(10^(i-1)+10^(2*d+1-i)),i=1..d)
end proc:
seq(seq(f(n,d),n=0..9^d-1),d=0..2); # Robert Israel, Feb 18 2018

Mathematica

Join[{0},Flatten[Table[Select[Range[10^(2n),10^(2n+1)-1],PalindromeQ[ #] && DigitCount[ #,10,0]==1&&IntegerDigits[#][[(IntegerLength[#]+1)/2]]==0&],{n,2}]]] (* Harvey P. Dale, Dec 03 2022 *)