cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

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

This page as a plain text file.
%I A387522 #13 Sep 04 2025 03:06:03
%S A387522 2,4,8,10,23,21,28,30,37,47,56,67,63,61,75,94,88,86,80,119,117,135,
%T A387522 131,174,166,162,160,156,154,150,200,235,229,227,217,215,209,270,266,
%U A387522 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
%N A387522 Index of first term in A386482 that is divisible by the n-th prime.
%H A387522 Michael De Vlieger, <a href="/A387522/b387522.txt">Table of n, a(n) for n = 1..65536</a> (first 841 terms from N. J. A. Sloane)
%t A387522 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 *)
%Y A387522 Cf. A386482, A386483, A387072, A387076.
%K A387522 nonn,new
%O A387522 1,1
%A A387522 _N. J. A. Sloane_, Sep 01 2025.