OFFSET
1,1
COMMENTS
LINKS
Michael De Vlieger, Table of n, a(n) for n = 1..10000
EXAMPLE
Table of n, a(n) for select n:
n a(n)
---------------------------------
1 60 = 2^2 * 3 * 5
2 84 = 2^2 * 3 * 7
3 90 = 2 * 3^2 * 5
4 126 = 2 * 3^2 * 7
5 132 = 2^2 * 3 * 11
6 140 = 2^2 * 5 * 7
7 150 = 2 * 3 * 5^2
8 156 = 2^2 * 3 * 13
9 180 = 2^2 * 3^2 * 5
22 315 = 3^2 * 5 * 7
32 420 = 2^2 * 3 * 5 * 7
603 4620 = 2^2 * 3 * 5 * 7 * 11
MATHEMATICA
Select[Range[2^10], And[Length[#] > 2, AnyTrue[#, # > 1 &], AllTrue[#, # < 3 &]] &[FactorInteger[#][[All, -1]] ] &]
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Michael De Vlieger, May 31 2026
STATUS
approved
