A087005 Divisors of 2310.
1, 2, 3, 5, 6, 7, 10, 11, 14, 15, 21, 22, 30, 33, 35, 42, 55, 66, 70, 77, 105, 110, 154, 165, 210, 231, 330, 385, 462, 770, 1155, 2310
Offset: 1
Links
- Index entries for sequences related to divisors of numbers
- Eric Weisstein's World of Mathematics, Primorial
- Eric Weisstein's World of Mathematics, Divisor
Programs
-
Mathematica
squarefrees[s_List] := Block[{a = Subsets[s]}, SortBy[Table[ Product[a[[n, m]], {m, 1, Length[a[[n]]]}], {n, 1, Length[a]}], Abs[#] &]] A087005 = squarefrees[Prime[Range[5]]](* Fred Daniel Kline, Jan 25 2015 *) Divisors[2310] (* Harvey P. Dale, Jun 27 2020 *)
-
PARI
divisors(2310) \\ Charles R Greathouse IV, Jun 21 2017
Comments