login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A129296 Number of divisors of n^2 - 1 that are not greater than n. 6

%I #36 Jun 18 2022 04:04:16

%S 1,1,2,2,4,2,5,3,5,3,8,2,8,4,6,4,9,2,12,4,8,4,10,3,10,6,8,4,16,2,14,4,

%T 7,8,12,4,12,4,10,4,20,2,16,6,8,6,12,3,18,6,12,4,16,4,20,8,10,4,16,2,

%U 16,6,8,12,16,4,16,4,16,4,30,2,15,6,8,12,16,4,24,5,12,5,16,4,16,8,10,4,30,4

%N Number of divisors of n^2 - 1 that are not greater than n.

%C a(n) = #{d: d<=n and A005563(n+1) mod d = 0};

%C a(n)>1 for n>2, see A129297 for m such that a(m)=2: a(A129297(n)) = 2.

%C If a(6n) = 2 for n>=1, then 6n-1 and 6n+1 are twin primes see A129297. - _Fred Daniel Kline_, Jan 02 2014

%H Reinhard Zumkeller, <a href="/A129296/b129296.txt">Table of n, a(n) for n = 1..10000</a>

%H Adrian W. Dudek, <a href="https://doi.org/10.1017/S0004972715001136">On the number of divisors of n^2-1</a>, Bulletin of the Australian Mathematical Society, Vol. 93, No. 2 (2016), pp. 194-198; <a href="https://arxiv.org/abs/1507.08893">arXiv preprint</a>, arXiv:1507.08893 [math.NT], 2015.

%F a(n) = A000005(n^2-1)/2 for n >= 2. - _Robert Israel_, Aug 03 2015

%e a(100) = #{1,3,9,11,33,99} = 6.

%p 1,seq(numtheory:-tau(n^2-1)/2,n=2..100); # _Robert Israel_, Aug 03 2015

%t nd[n_]:=Count[Divisors[n^2-1],_?(#<=n&)]; Array[nd,100] (* _Harvey P. Dale_, Jan 03 2014 *)

%t a[n_] := DivisorSigma[0, n^2 -1]/2; a[1] = 1; Array[a, 100] (* _Amiram Eldar_, Jun 18 2022 *)

%o (PARI) a(n) = if (n==1, 1, sumdiv(n^2-1, d, d<=n)); \\ _Michel Marcus_, Jan 02 2014

%o (Haskell)

%o a129296 n = length [d | d <- [1..n], (n ^ 2 - 1) `mod` d == 0]

%o -- _Reinhard Zumkeller_, Jan 09 2014

%Y Cf. A000005, A005563, A129292, A129294.

%K nonn

%O 1,3

%A _Reinhard Zumkeller_, Apr 09 2007

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 28 20:05 EDT 2024. Contains 371254 sequences. (Running on oeis4.)