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 A360011 #17 Jan 21 2023 09:33:20
%S A360011 0,1,2,3,4,5,6,9,11,13,14,15,16,18,19,21,22,27,28,30,31,32,34,35,36,
%T A360011 38,39,46,47,49,50,52,54,55,57,58,60,61,62,63,64,65,66,69,70,74,75,77,
%U A360011 78,79,80,82,83,84,85,86,87,88,90,91,92,93,94,95,96,97,98,99,100
%N A360011 Integers k such that the product of the first k primes is a Niven number.
%C A360011 Integers k such that A002110(k) belongs to A005349.
%C A360011 So, the sequence A002110(a(n)) is a subsequence of A359960. - _Bernard Schott_, Jan 21 2023
%e A360011 A002110(5) = 2310 and 2310 is divisible by 2+3+1+0=6, so 5 is a term.
%t A360011 a={}; For[k=0, k<=100, k++, p=Product[Prime[i],{i,k}]; If[Mod[p,Total[IntegerDigits[p]]]==0, AppendTo[a,k]]]; a (* _Stefano Spezia_, Jan 21 2023 *)
%o A360011 (PARI) isok(k) = my(p=factorback(primes(k))); !(p % sumdigits(p));
%Y A360011 Cf. A002110, A005349, A359960.
%K A360011 nonn,base
%O A360011 1,3
%A A360011 _Michel Marcus_, Jan 21 2023