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 A236107 #22 Apr 09 2020 09:57:06 %S A236107 1,15,22,77 %N A236107 Nonprimes whose divisors are partition numbers. %C A236107 By definition all terms are partition numbers. %C A236107 Conjecture: no terms exist beyond 77. - _Jon E. Schoenfield_, Feb 05 2014 %e A236107 15 is in the sequence because 15 is a nonprime number and the divisors of 15 are 1, 3, 5, 15, which are also partition numbers. %t A236107 nmax = 1000; %t A236107 pp = PartitionsP[Range[nmax]]; %t A236107 selQ[n_] := Module[{dd = Divisors[n]}, Intersection[pp, dd] == dd]; %t A236107 Select[Range[nmax], !PrimeQ[#] && selQ[#]&] (* _Jean-François Alcover_, Apr 09 2020 *) %Y A236107 Cf. A000041, A018252, A038753, A236102, A236103, A236105, A236108, A236110. %K A236107 nonn,more %O A236107 1,2 %A A236107 _Omar E. Pol_, Jan 22 2014