A152763 Number of divisors of Catalan number A000108(n).
1, 1, 2, 2, 4, 8, 12, 8, 16, 16, 24, 32, 48, 72, 192, 96, 192, 256, 576, 512, 768, 768, 1024, 1152, 1152, 1728, 1536, 1536, 4096, 4096, 5120, 2048, 6144, 12288, 12288, 8192, 12288, 12288, 24576, 24576, 36864, 98304, 131072, 147456, 196608, 196608, 368640
Offset: 0
Links
- Amiram Eldar, Table of n, a(n) for n = 0..10000 (terms 0..1000 from G. C. Greubel)
Programs
-
Maple
A000108 := proc(n) binomial(2*n,n)/(n+1) ; end: A152763 := proc(n) numtheory[tau](A000108(n)) ; end: for n from 0 to 80 do printf("%d,",A152763(n)) ; od: # R. J. Mathar, Dec 15 2008
-
Mathematica
DivisorSigma[0, CatalanNumber@Range[0, 40]] (* Vladimir Reshetnikov, Nov 13 2015 *)
-
PARI
vector(100, n, n--; numdiv(binomial(2*n, n)/(n+1))) \\ Altug Alkan, Nov 13 2015
-
PARI
val(n,p) = (n - vecsum(digits(n,p)))/(p-1); \\ p-adic valuation of n! a(n) = my(r=1); forprime(p=2, 2*n, r*=val(2*n,p)-val(n,p)-val(n+1,p)+1); r \\ Jianing Song, Jun 16 2022
Extensions
Extended by R. J. Mathar, Dec 15 2008
Comments