|
|
|
|
1, 3, 6, 14, 19, 163, 170, 554, 716, 19916, 19927, 1264087, 1264100, 5779940, 7237940, 17559860, 17559877, 75264356677, 75264356696, 353956196696, 355036399736, 1254282070136, 1254282070159, 16687983940438159, 16687983940813159, 17351136747929959, 17351143890496999
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
FORMULA
|
|
|
MAPLE
|
|
|
MATHEMATICA
|
Table[Times @@ Select[Range[1, n], !CoprimeQ[#, n]&], {n, 1, 26}] // Accumulate (* Jean-François Alcover, Nov 02 2017 *)
|
|
CROSSREFS
|
Cf. A066570(n) = the product of cototatives of n.
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|