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 A114080 #9 Jul 22 2021 02:01:04
%S A114080 2,4,9,16,25,64,729,65536
%N A114080 Numbers k such that sigma(k) times the k-th prime is a brilliant number (A078972).
%C A114080 No additional terms up to 1 million. - _Harvey P. Dale_, Nov 13 2013
%e A114080 sigma(25) * p(25) = 3007 = 31*97.
%t A114080 brilQ[n_]:=Module[{pf=Transpose[FactorInteger[n]][[1]]},PrimeOmega[n] == 2&&IntegerLength[First[pf]]==IntegerLength[Last[pf]]]; Select[Range[ 100000], brilQ[DivisorSigma[1,#]Prime[#]]&] (* _Harvey P. Dale_, Nov 13 2013 *)
%K A114080 nonn,base
%O A114080 1,1
%A A114080 _Giovanni Resta_, Feb 13 2006