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.

A177942 Smallest prime divisor of (A177941(n))^2-4.

This page as a plain text file.
%I A177942 #9 Dec 14 2018 06:06:28
%S A177942 3,3,7,13,5,3,5,3,37,7,79,7,163,5,3,5,3,11,3,349,17,3,5,3,5,3,17,3,5,
%T A177942 3,5,3,757,17,3,5,3,23,3,5,3,1567,13,5,3,5,3,7,3163,5,3,5,3,17,3,5,3,
%U A177942 5,3,23,3,5,3,37,7,17,3,7,23,3,13,7,5,3,5,3,7,11,3,5,3,5,3,6547,7,13099,7,73
%N A177942 Smallest prime divisor of (A177941(n))^2-4.
%C A177942 Records are in A177945, indices of records in A177943.
%F A177942 a(n) = A020639((A177941(n))^2-4) .
%t A177942 Differences[NestList[# + FactorInteger[#^2 - 4][[1, 1]] - 1 &, 5, 100]] + 1 (* _Amiram Eldar_, Dec 14 2018 after _Michael De Vlieger_ at A177941 *)
%o A177942 (PARI) listap(nn) = {my(va = vector(nn), p); va[1] = 5; for (n=2, nn, p = factor(va[n-1]^2-4)[1,1]; print1(p, ", "); va[n] = va[n-1] + p - 1;);} \\ _Michel Marcus_, Dec 14 2018
%Y A177942 Cf. A177941, A023200, A177930, A177929.
%K A177942 nonn
%O A177942 1,1
%A A177942 _Vladimir Shevelev_, May 15 2010
%E A177942 Entries checked by _R. J. Mathar_, Jun 30 2010