cp's OEIS Frontend

A145278 Complement of A145198.

%I A145278 #10 Sep 01 2025 19:38:18
%S A145278 6,12,20,24,35,56,60,72,90,110,120,140,143,182,210,240,272,280,306,
%T A145278 342,399,420,462,504,506,575,650,702,720,756,812,840,870,930,990,992,
%U A145278 1056,1120,1122,1224,1332,1406,1430,1482,1560,1640,1722,1806,1892,1980,2002
%N A145278 Complement of A145198.
%H A145278 Rémy Sigrist, <a href="/A145278/b145278.txt">Table of n, a(n) for n = 1..10000</a>
%H A145278 Rémy Sigrist, <a href="/A145278/a145278.txt">C program for A145278</a>
%o A145278 (PARI) {m=2000; v=vector(m); z=2*m; u=vectorsmall(z); k=1; for(n=1, m, while(u[k], k++); v[n]=k; u[k]=1; j=n-1; p=k; while(j>0&&(p=p*v[j])<=z, u[p]=1; j--)); h=1; i=1; while(i<=m, if(h==v[i], i++, print1(h, ",")); h++)}
%o A145278 (C) /* See Links section. */
%o A145278 (Python)
%o A145278 from operator import mul
%o A145278 from itertools import count, accumulate, islice
%o A145278 from collections import deque
%o A145278 def A145278_gen(): # generator of terms
%o A145278     aset, alist = set(), deque()
%o A145278     for k in count(1):
%o A145278         if k in aset:
%o A145278             aset.remove(k)
%o A145278             yield k
%o A145278         else:
%o A145278             aset |= set(k*d for d in accumulate(alist,mul))
%o A145278             alist.appendleft(k)
%o A145278 A145278_list = list(islice(A145278_gen(),30)) # _Chai Wah Wu_, Sep 01 2025
%Y A145278 Cf. A145198.
%K A145278 nonn,changed
%O A145278 1,1
%A A145278 _Klaus Brockhaus_, Oct 06 2008