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.

A256153 Primitive prime factors of the cyclotomic polynomial sequence Phi(5,k) in the order in which they occur.

This page as a plain text file.
%I A256153 #17 Mar 26 2015 04:44:43
%S A256153 5,31,11,71,311,2801,151,61,41,271,3221,22621,30941,3761,4931,88741,
%T A256153 2711,911,251,40841,245411,292561,346201,521,8641,4561,637421,732541,
%U A256153 837931,17351,601,1801,39451,22571,49831,101,4271,194681,191,401,2625641,579281
%N A256153 Primitive prime factors of the cyclotomic polynomial sequence Phi(5,k) in the order in which they occur.
%C A256153 Phi(5,k) = k^4 + k^3 + k^2 + k + 1.
%C A256153 All terms end with the digit 1.
%H A256153 Robert Price, <a href="/A256153/b256153.txt">Table of n, a(n) for n = 1..1191</a>
%t A256153 prim = {}; Do[prim = Join[prim, Complement[First /@ FactorInteger[Cyclotomic[5, k]], prim]], {k, 1000}]; prim
%o A256153 (PARI) lista(nn) = {vs = []; for (n=1, nn, vp = factor(polcyclo(5,n))[,1]; for (i=1, #vp, if (!vecsearch(vs, vp[i]), print1(vp[i], ", "); vs = vecsort(concat(vs, vp[i]),,8););););} \\ _Michel Marcus_, Mar 20 2015
%Y A256153 Cf. A005529, A248874, A256144, A256145, A256146, A256148.
%K A256153 nonn
%O A256153 1,1
%A A256153 _Robert Price_, Mar 16 2015