A064518 For an integer n with prime factorization p_1*p_2*p_3* ... *p_m let n* = (p_1+1)*(p_2+1)*(p_3+1)* ... *(p_m+1); sequence gives n* such that n* is divisible by n, ordered by increasing value of n.
1, 12, 36, 144, 432, 1296, 1728, 5184, 15552, 20736, 46656, 62208, 186624, 248832, 559872, 746496, 1679616, 2239488, 2985984, 6718464, 8957952, 20155392, 26873856, 60466176, 35831808, 80621568, 107495424, 241864704, 322486272
Offset: 1
Keywords
Links
- Sean A. Irvine, Table of n, a(n) for n = 1..1000 (terms 1..50 from Harry J. Smith)
Programs
-
PARI
ns(n)= { local(f,p=1); f=factor(n); for(i=1, matsize(f)[1], p*=(1 + f[i, 1])^f[i, 2]); return(p) } { n=0; for (m=1, 10^9, s=ns(m); if (s%m == 0, write("b064518.txt", n++, " ", s); if (n==50, break)) ) } \\ Harry J. Smith, Sep 17 2009
Formula
Extensions
Title clarified by Sean A. Irvine, Jul 15 2023
Comments