cp's OEIS Frontend

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.

A130864 Numbers x such that x + reverse of x is a non-palindromic prime.

This page as a plain text file.
%I A130864 #6 Jan 27 2021 17:13:34
%S A130864 158,166,170,172,178,182,188,190,196,229,239,257,265,269,271,277,281,
%T A130864 287,295,299,328,338,356,364,368,370,376,380,386,394,398,427,437,439,
%U A130864 455,463,467,469,475,479,485,493,497,499,526,536,538,554,562,566,568
%N A130864 Numbers x such that x + reverse of x is a non-palindromic prime.
%H A130864 Harvey P. Dale, <a href="/A130864/b130864.txt">Table of n, a(n) for n = 0..4500</a>
%t A130864 Select[Range[1000], PrimeQ[ # + FromDigits[Reverse[IntegerDigits[ # ]]]] && # + FromDigits[Reverse[IntegerDigits[ # ]]] != FromDigits[ Reverse[IntegerDigits[ # + FromDigits[Reverse[IntegerDigits[ # ]]]]]] &]
%t A130864 nppQ[n_]:=With[{c=n+IntegerReverse[n]},PrimeQ[c]&&!PalindromeQ[c]]; Select[ Range[600],nppQ] (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, Jan 27 2021 *)
%Y A130864 A subsequence of A072366 = Numbers x such that x + reverse of x is a prime.
%K A130864 base,nonn
%O A130864 0,1
%A A130864 _Tanya Khovanova_, Jul 23 2007