STATUS
proposed
approved
The OEIS is supported by the many generous donors to the OEIS Foundation.
Revision History for A340289
(Bold, blue-underlined text is an addition; faded, red-underlined text is aShowing all changes.
STATUS
editing
proposed
PROG
(PARI) a(n) = sum(k=1, n\2, floor(sqrtn(k, n-k)*sqrtn(n-k, k))); \\ Michel Marcus, Jan 03 2021
MATHEMATICA
Table[Sum[Floor[k^(1/(n - k))*(n - k)^(1/k)], {k, Floor[n/2]}], {n, 100}]
100}]
STATUS
proposed
editing
STATUS
editing
proposed
CROSSREFS
Cf. A340288.
NAME
allocated for Wesley Ivan Hurt
a(n) = Sum_{k=1..floor(n/2)} floor(k^(1/(n-k))*(n-k)^(1/k)).
DATA
0, 1, 2, 5, 6, 9, 10, 13, 13, 16, 17, 20, 21, 23, 24, 26, 28, 30, 31, 33, 34, 36, 37, 39, 40, 43, 45, 48, 49, 51, 52, 54, 55, 57, 58, 60, 62, 64, 65, 67, 68, 70, 71, 73, 74, 76, 77, 79, 80, 83, 84, 86, 87, 89, 90, 92, 93, 95, 97, 99, 100, 102, 103, 106, 108, 110, 111, 113
OFFSET
1,3
MATHEMATICA
Table[Sum[Floor[k^(1/(n - k))*(n - k)^(1/k)], {k, Floor[n/2]}], {n,
100}]
KEYWORD
allocated
nonn
AUTHOR
Wesley Ivan Hurt, Jan 03 2021
STATUS
approved
editing
NAME
allocated for Wesley Ivan Hurt
KEYWORD
allocated
STATUS
approved