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.

12, 14, 18, 22, 24, 26, 30, 33, 34, 38, 39, 40, 42, 44, 46, 48, 50, 51, 52, 54, 57, 58, 60, 62, 63, 65, 66, 68, 69, 72, 74, 75, 76, 77, 80, 82, 85, 86, 87, 88, 90, 92, 93, 94, 95, 96, 98, 99, 100, 102, 104, 105, 106, 108, 110, 111, 112, 114, 115, 116, 117, 118

Offset

1,1

Links

Table of n, a(n) for n=1..62.

Prog

(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
(Python)
from itertools import count, islice
from math import comb
def A375083_gen(): # generator of terms
    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))
A375083_list = list(islice(A375083_gen(), 20)) # Chai Wah Wu, Jul 30 2024

Crossrefs

Cf. A007318, A349958, A374959, A375082.

Sequence in context: A381501 A078417 A107835 * A257966 A342814 A255842

Adjacent sequences: A375080 A375081 A375082 * A375084 A375085 A375086

Keyword

nonn

Author

Pontus von Brömssen, Jul 29 2024

Status

approved