A375082 -id:A375082 - 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.

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

Pontus von Brömssen, Jul 29 2024

nonn

Cf. A007318, A349958, A374959, A375082.

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

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

A375084 Indices of records in A375082.

Original entry on oeis.org

1, 12, 22, 38, 46, 94, 158, 213, 321, 382, 766, 1941, 2302, 2558, 7166, 10238, 12286

Offset: 1

Pontus von Brömssen, Jul 29 2024

Cf. A375082.

from math import comb
from itertools import islice, count
def A375084_gen(): # generator of terms
    c = 0
    for n in count(1):
        if (d:=next(a for a, b in (divmod(comb(j,k),n) for j in range(n+1) for k in range(j+1)) if not b))>c:
            c = d
            yield n
A375084_list = list(islice(A375084_gen(),10)) # Chai Wah Wu, Jul 30 2024

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.

Views

Author

Keywords

Crossrefs

Programs

PARI