This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A232655 #7 Nov 28 2013 15:42:36 %S A232655 5,13,19,103,139,181,193,271,277,313,379,433,577,619,631,853,859,883, %T A232655 1093,1117,1123,1237,1279,1321,1741,1873,1933,1987,2659,2707,2713, %U A232655 2719,2767,2791,3163,3217,3271,3331,3469,3529,3547,3631,3637,3727,3907,3943,4129,4177 %N A232655 Primes p such that reversal (p^2+p) is also prime. %H A232655 K. D. Bajpai, <a href="/A232655/b232655.txt">Table of n, a(n) for n = 1..6650</a> %e A232655 a(2)= 13, it is prime: n= 6, prime(6)= 13: reversal(13^2+13)= 281, which is also prime. %e A232655 a(4)= 103, it is prime: n= 27, prime(27)= 103: reversal(103^2+103)= 21701, which is also prime. %e A232655 a(6)= 181, it is prime: n= 42, prime(42)= 181: reversal(181^2+181)= 24923, which is also prime. %p A232655 with(StringTools): KD:= proc() local a, p; p:=ithprime(n); a:= parse(Reverse(convert((p^2+p), string))); if isprime(a) then RETURN (p): fi; end: seq(KD(), n=1..3000); %t A232655 Select[Prime[Range[3000]], PrimeQ[FromDigits[Reverse[IntegerDigits[#^2 + #]]]] &] %Y A232655 Cf. A004087 (primes written backwards). %Y A232655 Cf. A061783 (primes p: p+(p reversed)is also prime). %Y A232655 Cf. A232446 (primes p: reversal(p^2)+p is also prime). %K A232655 nonn,base,less %O A232655 1,1 %A A232655 _K. D. Bajpai_, Nov 27 2013