A387522 Index of first term in A386482 that is divisible by the n-th prime.

2, 4, 8, 10, 23, 21, 28, 30, 37, 47, 56, 67, 63, 61, 75, 94, 88, 86, 80, 119, 117, 135, 131, 174, 166, 162, 160, 156, 154, 150, 200, 235, 229, 227, 217, 215, 209, 270, 266, 260, 254, 252, 242, 240, 297, 295, 314, 354, 350, 348, 344, 338, 336, 326, 428, 422, 416, 414, 408, 404, 402, 392, 378, 374, 372, 478, 464, 458, 608, 606, 602

Offset

1,1

Links

Michael De Vlieger, Table of n, a(n) for n = 1..65536 (first 841 terms from N. J. A. Sloane)

Mathematica

Block[{p, s}, p[_] := 0; s = Import["https://oeis.org/A386482/b386482.txt", "Data"][[All, -1]]; Do[Map[If[p[#] == 0, Set[p[#], n]] &, FactorInteger[s[[n]]][[;; , 1]]], {n, Length[s]}]; TakeWhile[Array[p[Prime[#]] &, 120], # > 0 &] ] (* Michael De Vlieger, Sep 03 2025 *)

Crossrefs

Cf. A386482, A386483, A387072, A387076.

Sequence in context: A308832 A124849 A376681 * A056654 A365002 A370663

Adjacent sequences: A387519 A387520 A387521 * A387523 A387524 A387525

Keyword

nonn

Author

N. J. A. Sloane, Sep 01 2025.

Status

approved