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 A322546 #10 Jul 17 2021 07:00:15
%S A322546 1,2,3,4,5,7,8,9,11,13,17,19,23
%N A322546 Numbers k such that every integer partition of k contains a 1 or a prime power.
%e A322546 24 does not belong to the sequence because there are integer partitions of 24 containing no 1's or prime powers, namely: (24), (18,6), (14,10), (12,12), (12,6,6), (6,6,6,6).
%t A322546 nn=100;
%t A322546 ser=Product[If[n==1||PrimePowerQ[n],1,1/(1-x^n)],{n,nn}];
%t A322546 Join@@Position[CoefficientList[Series[ser,{x,0,nn}],x],0]-1
%Y A322546 Cf. A000607, A002095, A023893, A023894, A064573, A078135, A101417, A246655, A320322, A322452, A322454, A322547.
%K A322546 nonn,fini,full
%O A322546 1,2
%A A322546 _Gus Wiseman_, Dec 14 2018