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 A211188 #15 Jun 25 2024 01:30:49 %S A211188 0,2,2,4,5,2,5,6,2,13,5,17,3,12,11,15,9,6,21,11,6,7,3,7,7,18,7,10,6, %T A211188 14,11,7,6,29,2,6,22,10,10,6,16,12,6,5,11,15,6,24,12,13,19,21,15,45,3, %U A211188 17,6,11,24,15,9,9,6,28,3,7,7,26,10,55,14,21,24,8 %N A211188 a(n) is the number of distinct prime divisors among all the composites of the form k^2 + 1 between the two primes A002496(n) and A002496(n+1). %C A211188 a(1)=0; for n > 1, a(n) = number of elements of each row in A211175(n). %H A211188 Michel Lagneau, <a href="/A211188/b211188.txt">Table of n, a(n) for n = 1..10000</a> %p A211188 with(numtheory) :lst:={}: for n from 2 to 600 do:p:=n^2+1:x:=factorset(p):lst:=lst union x:if type(p,prime)=true then m:=nops(lst minus {p}): printf(`%d, `,m):lst:={}:else fi:od: %Y A211188 Cf. A002144, A002496, A002522, A134406, A181413, A206400, A211175. %K A211188 nonn %O A211188 1,2 %A A211188 _Michel Lagneau_, Feb 03 2013