This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A115884 The n-th prime plus n gives a palindrome. 6
 1, 2, 3, 4, 22, 45, 66, 71, 75, 88, 94, 97, 103, 105, 116, 140, 331, 432, 454, 565, 646, 703, 795, 1042, 1108, 1168, 1248, 1334, 1644, 1652, 1864, 1874, 1900, 2181, 2295, 2323, 2485, 2509, 2585, 2679, 2835, 2899, 2923, 3052, 3360, 3372, 3396, 3404 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 LINKS Harvey P. Dale, Table of n, a(n) for n = 1..1000 EXAMPLE prime(103)+103 = 666, a palindrome. MAPLE filter:= proc(n) local p, L;    p:= ithprime(n)+n;    L:= convert(p, base, 10);    ListTools:-Reverse(L) = L end proc: select(filter, [\$1..10000]); # Robert Israel, Nov 04 2014 MATHEMATICA palQ[n_]:=Module[{idn=IntegerDigits[n]}, idn==Reverse[idn]]; With[ {nn=3500}, Rest[Flatten[Position[Total/@Thread[{Prime[Range[nn]], Range[nn]}], _?(palQ)]]]] (* Harvey P. Dale, Oct 11 2011 *) palQ[n_] := Reverse[x = IntegerDigits[n]] == x; Select[Range[3405], palQ[Prime[#] + #] &] (* Jayanta Basu, Jun 24 2013 *) CROSSREFS Cf. A084122, A115885, A115888. Sequence in context: A019074 A019075 A006709 * A171728 A010345 A233344 Adjacent sequences:  A115881 A115882 A115883 * A115885 A115886 A115887 KEYWORD nonn,base AUTHOR Giovanni Resta, Feb 06 2006 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
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified October 19 04:40 EDT 2019. Contains 328211 sequences. (Running on oeis4.)