|
|
A135996
|
|
Difference between 2^n and the largest factorial <= 2^n.
|
|
2
|
|
|
0, 0, 2, 2, 10, 8, 40, 8, 136, 392, 304, 1328, 3376, 3152, 11344, 27728, 25216, 90752, 221824, 161408, 685696, 1734272, 565504, 4759808, 13148416, 29925632, 27192064, 94300928, 228518656, 57869312, 594740224, 1668482048, 3815965696, 2362913792
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
FORMULA
|
|
|
EXAMPLE
|
a(6) = 2^6 - 4! = 40
a(7) = 2^7 - 5! = 8
a(8) = 2^8 - 5! = 136
|
|
MAPLE
|
|
|
MATHEMATICA
|
d2n[n_]:=Module[{n2=2^n, fcts=Reverse[Range[100]!]}, n2-Select[fcts, #<= n2&, 1]]; Flatten[Array[d2n, 40, 0]] (* Harvey P. Dale, Aug 22 2012 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|