A092517 Product of tau values for consecutive integers.
2, 4, 6, 6, 8, 8, 8, 12, 12, 8, 12, 12, 8, 16, 20, 10, 12, 12, 12, 24, 16, 8, 16, 24, 12, 16, 24, 12, 16, 16, 12, 24, 16, 16, 36, 18, 8, 16, 32, 16, 16, 16, 12, 36, 24, 8, 20, 30, 18, 24, 24, 12, 16, 32, 32, 32, 16, 8, 24, 24, 8, 24, 42, 28, 32, 16, 12, 24, 32, 16, 24, 24, 8, 24, 36
Offset: 1
Keywords
Links
- Ray Chandler, Table of n, a(n) for n = 1..10000
Programs
-
Magma
[ NumberOfDivisors(n^2+n) : n in [1..100]]; // Vincenzo Librandi, Apr 03 2011
-
Maple
with(numtheory): seq(tau(n)*tau(n+1),n=1..73); # Zerinvary Lajos, Jan 22 2007
-
Mathematica
Table[DivisorSigma[0,n^2+n],{n,100}] (* Giorgos Kalogeropoulos, Apr 28 2021 *) Times@@#&/@Partition[DivisorSigma[0,Range[80]],2,1] (* Harvey P. Dale, Apr 21 2022 *)
-
PARI
a(n) = numdiv(n^2+n); \\ Michel Marcus, Jan 11 2020
-
Python
from sympy import divisor_count def A092517(n): return divisor_count(n)*divisor_count(n+1) # Chai Wah Wu, Jan 06 2022
Extensions
Extended by Ray Chandler, Jun 23 2008
Comments