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.
%I A256145 #13 Mar 22 2015 17:59:00 %S A256145 2,17,41,257,313,1297,1201,241,193,73,137,7321,89,233,14281,937,1489, %T A256145 65537,41761,113,929,3833,160001,97241,3209,139921,331777,11489,26881, %U A256145 6481,614657,353641,3361,409,1129,61681,97,6113,1336337,750313,98801,10529,50857 %N A256145 Primitive prime factors of the cyclotomic polynomial sequence Phi(8,k) in the order in which they occur. %C A256145 Phi(8,k) = k^4 + 1. %t A256145 prim = {}; Do[prim = Join[prim, Complement[First /@ FactorInteger[Cyclotomic[8, k]], prim]], {k, 1000}]; prim %o A256145 (PARI) lista(nn) = {vs = []; for (n=1, nn, vp = factor(polcyclo(8,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 A256145 Cf. A005529, A096171, A248874, A256144. %K A256145 nonn %O A256145 1,1 %A A256145 _Robert Price_, Mar 16 2015