A187112 a(n) = cube root of the largest proper divisor of A187104(n).

2, 3, 3, 4, 5, 5, 6, 5, 7, 8, 7, 9, 7, 10, 9, 7, 11, 12, 11, 13, 14, 13, 11, 15, 16, 11, 17, 15, 13, 18, 19, 11, 17, 13, 20, 21, 19, 22, 13, 23, 17, 24, 21, 13, 25, 19, 17, 26, 23, 27, 28, 25, 19, 29, 30, 17, 27, 31, 23, 17, 32, 33, 29, 19, 25, 34, 17, 23, 35, 19, 31, 36, 37, 33, 38, 19, 39, 29, 40, 35, 19, 23, 41, 42, 31, 37, 23, 43, 44, 29, 39, 45, 46, 41, 23, 47, 31, 35, 48, 23, 49, 43, 50

Offset: 1

Author

Zak Seidov, Mar 05 2011

Keywords

• nonn

Links

• Zak Seidov, Table of n, a(n) for n = 1..2671

Crossrefs

Cf. A187104 (largest proper divisor is a cube).

Programs

PARI

lista(nn) = {forcomposite(n=1, nn, if (ispower(divisors(n)[numdiv(n)-1], 3, &k), print1(k, ", ")););} \\ Michel Marcus, Aug 09 2014

Formula

a(n) = A048766(A032742(A187104(n))). - Michel Marcus, Aug 09 2014