cp's OEIS Frontend

A375083 Numbers k such that k is not the first multiple of k that appears in Pascal's triangle (read by rows), i.e., such that A375082(k) > 1.

%I A375083 #11 Jul 30 2024 14:34:35
%S A375083 12,14,18,22,24,26,30,33,34,38,39,40,42,44,46,48,50,51,52,54,57,58,60,
%T A375083 62,63,65,66,68,69,72,74,75,76,77,80,82,85,86,87,88,90,92,93,94,95,96,
%U A375083 98,99,100,102,104,105,106,108,110,111,112,114,115,116,117,118
%N A375083 Numbers k such that k is not the first multiple of k that appears in Pascal's triangle (read by rows), i.e., such that A375082(k) > 1.
%o A375083 (PARI) isok(k) = for (i=1, k-1, for (j=1, i, my(b=binomial(i, j)); if (((b % k) == 0), return(b!=k)););); \\ _Michel Marcus_, Jul 30 2024
%o A375083 (Python)
%o A375083 from itertools import count, islice
%o A375083 from math import comb
%o A375083 def A375083_gen(): # generator of terms
%o A375083     return filter(lambda n:next(c for c in (comb(j,k) for j in range(n+1) for k in range(j+1)) if not c%n)>n, count(1))
%o A375083 A375083_list = list(islice(A375083_gen(),20)) # _Chai Wah Wu_, Jul 30 2024
%Y A375083 Cf. A007318, A349958, A374959, A375082.
%K A375083 nonn
%O A375083 1,1
%A A375083 _Pontus von Brömssen_, Jul 29 2024