

A258617


a(n) = (4*n+8)*n^2.


0



0, 12, 64, 180, 384, 700, 1152, 1764, 2560, 3564, 4800, 6292, 8064, 10140, 12544, 15300, 18432, 21964, 25920, 30324, 35200, 40572, 46464, 52900, 59904, 67500, 75712, 84564, 94080, 104284, 115200, 126852, 139264, 152460, 166464, 181300, 196992, 213564
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

0,2


COMMENTS

Let r be a natural number such that r has 17 proper divisors and 5 prime factors (note that these prime factors do not have to be distinct). The difference between these two values, say d(r), is in this case 12. Where n is a positive integer, d(r^n)=(4*n+8)*n^2.
The integers that satisfy the properdivisorprimefactor requirement are those of A179643.


LINKS

Table of n, a(n) for n=0..37.
Index entries for linear recurrences with constant coefficients, signature (4,6,4,1).


FORMULA

a(n) = 4*A152618(n+1).
G.f.: 4*x*(3+4*xx^2)/(1x)^4.  Vincenzo Librandi, Jun 06 2015
a(n) = 4*a(n1)6*a(n2)+4*a(n3)a(n4).  Vincenzo Librandi, Jun 06 2015
For any m, let x=A179643(m), then a(n) = A000005(x^n)  A001222(x^n).  Michel Marcus, Jul 09 2015


EXAMPLE

The smallest integer that satisfies the (17, 5) requirement is 180: it has 17 proper divisors (1, 2, 3, 4, 5, 6, 9, 10, 12, 15, 18, 20, 30, 36, 45, 60, 90) and 5 prime factors (2, 2, 3, 3, 5), so d(120)=12=a(1).
The square of 180, 32400, we would expect to have a difference of 64 between the number of its proper divisors and prime factors, and with respectively 74 and 10, d(32400)=64=a(2) indeed. Checking this with further integer powers of 180 will continue to generate terms in this sequence.


MATHEMATICA

Table[(4 n + 8) n^2, {n, 0, 40}] (* or *) CoefficientList[Series[4 x (3 + 4 x  x^2)/(1  x)^4, {x, 0, 40}], x] (* Vincenzo Librandi, Jun 06 2015 *)


PROG

(MAGMA) [(4*n+8)*n^2: n in [0..50]] /* or */ I:=[0, 12, 64, 180]; [n le 4 select I[n] else 4*Self(n1)6*Self(n2)+4*Self(n3)Self(n4): n in [1..40]]; // Vincenzo Librandi, Jun 06 2015
(PARI) vector(50, n, n; (4*n+8)*n^2) \\ Derek Orr, Jun 21 2015


CROSSREFS

Cf. A152618, A179643.
Sequence in context: A154507 A105916 A193872 * A307061 A074359 A104062
Adjacent sequences: A258614 A258615 A258616 * A258618 A258619 A258620


KEYWORD

nonn,easy


AUTHOR

Garrett Frandson, Jun 05 2015


EXTENSIONS

More terms from Vincenzo Librandi, Jun 06 2015


STATUS

approved



