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 A300098 #7 Feb 27 2018 05:31:20 %S A300098 6,10,28,52,76,184,248,376,424,488,584,664,1335,3729,3801,6501,7385, %T A300098 9669,10461,16345,17815,26571,27895,28479,45237,69485,81835,123411, %U A300098 124345,140465,207005,341665,361749,396815,526809,592491,890165,977727,1377485,1992215,2186585 %N A300098 Records of A288814. %C A300098 Also records of A295185. %F A300098 a(n) = A288814(A300097(n)). %o A300098 (PARI) isok(k, n) = my(f=factor(k)); sum(j=1, #f~, f[j, 1]*f[j, 2]) == n; %o A300098 scompo(n) = forcomposite(k=4, ,if (isok(k, n), return(k))); %o A300098 lista(nn) = {my(last = 0); forprime(p=4, nn, my(val = scompo(p)); if (val > last, print1(val, ", "); last = val););} %Y A300098 Cf. A288814, A295185, A300097. %K A300098 nonn %O A300098 1,1 %A A300098 _Michel Marcus_, Feb 24 2018