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.

A072282 Numbers n such that sigma(n) + 1 and sigma(n) - 1 are twin primes.

This page as a plain text file.
%I A072282 #14 Apr 06 2023 14:41:06
%S A072282 3,5,6,10,11,17,20,24,26,29,30,38,41,46,51,55,59,71,85,88,101,105,107,
%T A072282 114,118,126,135,136,137,141,145,147,149,155,158,161,177,178,179,185,
%U A072282 191,197,203,206,207,209,216,227,230,236,238,239,255,269,278,281,296
%N A072282 Numbers n such that sigma(n) + 1 and sigma(n) - 1 are twin primes.
%H A072282 Amiram Eldar, <a href="/A072282/b072282.txt">Table of n, a(n) for n = 1..10000</a>
%e A072282 sigma(20) + 1 = 43 and sigma(20) - 1 = 41, so 20 is a term of the sequence.
%t A072282 Select[Range[10^3], PrimeQ[DivisorSigma[1, # ] + 1] && PrimeQ[DivisorSigma[1, # ] - 1] &]
%t A072282 Select[Range[300],AllTrue[DivisorSigma[1,#]+{1,-1},PrimeQ]&] (* _Harvey P. Dale_, Apr 06 2023 *)
%o A072282 (PARI) isok(n) = my(p=sigma(n)-1); isprime(p) && isprime(p+2); \\ _Michel Marcus_, Sep 30 2019
%Y A072282 Cf. A000203, A068017.
%K A072282 easy,nonn
%O A072282 1,1
%A A072282 _Joseph L. Pe_, Jul 10 2002
%E A072282 More terms from _Amiram Eldar_, Sep 30 2019