|
|
A003138
|
|
Nearest integer to 24*(2^n - 1)/n.
|
|
4
|
|
|
24, 36, 56, 90, 149, 252, 435, 765, 1363, 2455, 4466, 8190, 15122, 28085, 52427, 98303, 185041, 349524, 662257, 1258290, 2396744, 4575603, 8753329, 16777215, 32212254, 61946643, 119304646, 230087533
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
R. J. Penrose, Puzzle, Twistor Newsletter, No. 10 (July 1980), p. 22.
R. J. Penrose, Puzzle, Twistor Newsletter, No. 10 (July 1980), p. 22. [Cached copy]
|
|
MATHEMATICA
|
A003138[n_]:= With[{m=24*(2^n-1)/n}, If[Floor[m+1/2] -Floor[m]>=1/2, Ceiling[m], Floor[m]]];
|
|
PROG
|
(Magma) [Round(24*(2^n -1)/n): n in [1..70]]; // G. C. Greubel, Nov 04 2022
(SageMath) [round(24*(2^n -1)/n) for n in range(1, 71)] # G. C. Greubel, Nov 04 2022
(PARI) a(n) = round(24*(2^n - 1)/n); \\ Michel Marcus, Nov 05 2022
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|