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 A083372 #7 May 26 2018 12:29:41 %S A083372 15,21,55,33,39,85,51,57,115,69,203,145,87,93,259,185,111,205,123,129, %T A083372 235,141,371,265,159,413,295,177,183,469,335,201,355,213,219,553,395, %U A083372 237,415,249,623,445,267,1313,679,485,291,505,303,309,535,321,327,565 %N A083372 Least number having exactly two odd prime factors that differ by 2n. %C A083372 The lesser of the two factors is in A002373. %e A083372 We have a(4) = 33 because 33 = 3*11, with 11 - 3 = 2*4, the smallest number with this property. Others are 85 = 5*13, 209 = 11*19, 713 = 23*31, 1073 = 29*37, 3233 = 53*61, ... %t A083372 f[n_] := Block[{p = 3}, While[ ! PrimeQ[p] || ! PrimeQ[p + 2n], p++ ]; p(p + 2n)]; Table[ f[n], {n, 1, 55}] %t A083372 Table[#(#+2n)&/@Select[Prime[Range[2,100]],PrimeQ[#+2n]&,1],{n,60}]// Flatten (* _Harvey P. Dale_, May 26 2018 *) %Y A083372 Cf. A046388. %K A083372 nonn %O A083372 1,1 %A A083372 _Lekraj Beedassy_, Jun 05 2003 %E A083372 Edited and extended by _Robert G. Wilson v_, Jun 07 2003