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.

A261609 Number of composite divisors of n^2+1.

This page as a plain text file.
%I A261609 #14 Dec 16 2024 16:39:51
%S A261609 0,0,1,0,1,0,3,1,1,0,1,1,4,0,1,0,4,3,1,0,4,1,4,0,1,0,4,1,1,1,4,3,4,1,
%T A261609 1,0,4,3,1,0,3,1,8,1,1,1,11,1,1,1,1,1,4,0,4,0,12,1,1,1,1,1,4,1,1,0,4,
%U A261609 5,1,3,1,4,11,0,4,1,4,1,1,1,4,3,11,0,1,1
%N A261609 Number of composite divisors of n^2+1.
%H A261609 Michel Lagneau, <a href="/A261609/b261609.txt">Table of n, a(n) for n = 1..10000</a>
%F A261609 a(n) = A055212(A002522(n)).
%e A261609 a(7) = 3 because the composite divisors of 7^2+1 are 10, 25, 50.
%t A261609 Table[ Count[ PrimeQ[ Divisors[n^2+1] ], False] - 1, {n, 1, 105} ]
%t A261609 Table[Count[Divisors[n^2+1],_?CompositeQ],{n,100}] (* _Harvey P. Dale_, Dec 16 2024 *)
%Y A261609 Cf. A002522, A055212, A128428, A193330, A193432.
%K A261609 nonn,easy
%O A261609 1,7
%A A261609 _Michel Lagneau_, Aug 26 2015