A268418 Numbers other than prime powers divisible by the sum, the sum of squares and the sum of cubes of their prime divisors.
12192180, 15724800, 24384360, 31449600, 36576540, 47174400, 48768720, 60960900, 62899200, 73153080, 78624000, 85345260, 94348800, 97537440, 109729620, 110073600, 121921800, 125798400, 134113980, 141523200, 146306160, 157248000, 158498340, 170690520, 182882700, 188697600, 195074880
Offset: 1
Keywords
Links
- Charles R Greathouse IV, Table of n, a(n) for n = 1..100
- Jean-Marie de Koninck, Florian Luca, Integers divisible by sums of powers of their prime factors, Journal of Number Theory, Volume 128, Issue 3, March 2008, Pages 557-563.
Programs
-
PARI
isok(n) = my(f = factor(n)[,1]); (#f>2) && ((n % vecsum(f)) == 0) && ((n % sum(k=1, #f, f[k]^2)) == 0) && ((n % sum(k=1, #f, f[k]^3)) == 0);