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 A078762 #11 May 01 2018 21:32:19 %S A078762 1,2,3,4,5,8,11,16,21,23,27,29,35,36,41,53,55,57,63,64,65,75,77,83,85, %T A078762 89,98,100,111,113,119,125,128,131,133,143,144,155,161,171,173,179, %U A078762 183,189,191,203,205,209,215,233,235,237,239,242,243,245,251,253,259,275 %N A078762 Numbers n such that n + sigma(n) is prime. %C A078762 Union of A005384 (Sophie Germain primes) and A249486. - _Jaroslav Krizek_, Nov 13 2014 %H A078762 Robert Israel, <a href="/A078762/b078762.txt">Table of n, a(n) for n = 1..10000</a> %p A078762 select(t -> isprime(t+numtheory:-sigma(t)), [$1..1000]); # _Robert Israel_, May 01 2018 %t A078762 Select[Range[10^3], PrimeQ[ # + DivisorSigma[1, # ]] &] %o A078762 (PARI) for(n=1,1000,if(isprime(sigma(n)+n),print1(n,", "))) \\ _Derek Orr_, Nov 13 2014 %K A078762 nonn,easy %O A078762 1,2 %A A078762 _Joseph L. Pe_, Jan 08 2003