A120319 RF(3): refactorable numbers with smallest prime factor 3.
9, 225, 441, 1089, 1521, 2025, 2601, 3249, 4761, 5625, 6561, 7569, 8649, 12321, 15129, 16641, 19881, 25281, 31329, 33489, 35721, 40401, 45369, 47961, 50625, 56169, 62001, 71289, 84681, 91809, 95481, 99225, 103041, 106929, 114921, 145161, 154449, 164025, 168921
Offset: 1
Keywords
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
Programs
-
Maple
with(numtheory); RF3:=[]: p:=3: for w to 1 do for j from 1 to 12^3 do k:=2*j+1; if k mod p = 0 then n:=k^2; t:=tau(n); if (n mod t = 0) then RF3:=[op(RF3),n]; print(ifactor(n)); fi fi; od od;
-
PARI
lista(kmax) = forstep(k = 3, kmax, 6, if(!(k^2 % numdiv(k^2)), print1(k^2, ", "))); \\ Amiram Eldar, Aug 01 2024
Extensions
a(37)-a(39) from Amiram Eldar, Aug 01 2024
Comments