|
|
A057795
|
|
Sum k!, where sum is over positive integers k <= n with gcd(k,n) = 1.
|
|
0
|
|
|
1, 1, 3, 7, 33, 121, 873, 5167, 45507, 367927, 4037913, 39921961, 522956313, 6267300607, 93445274187, 1313941673647, 22324392524313, 355693695038761, 6780385526348313, 122000794104233527, 2554923725074062867
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,3
|
|
LINKS
|
|
|
EXAMPLE
|
a(6) = 1! + 5! = 121 because 1 and 5 are the positive integers that are <= 6 and are relatively prime to 6.
|
|
MATHEMATICA
|
Table[Total[Select[Range[n], CoprimeQ[#, n]&]!], {n, 30}] (* Harvey P. Dale, Apr 07 2022 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|