|
|
A061979
|
|
Floor of arithmetic-geometric mean of n and prime(n).
|
|
8
|
|
|
1, 2, 3, 5, 7, 9, 11, 12, 15, 18, 19, 22, 25, 26, 28, 31, 34, 36, 39, 41, 42, 45, 48, 51, 54, 57, 58, 60, 62, 64, 70, 72, 75, 77, 81, 83, 86, 89, 91, 94, 97, 98, 103, 104, 107, 108, 113, 118, 121, 122, 124, 127, 129, 133, 136, 139, 142, 144, 147, 149, 151, 155, 161
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
PROG
|
(PARI) v=[]; for(n=1, 120, v=concat(v, floor(agm(n, prime(n))))); v
(PARI) { for (n=1, 1000, write("b061979.txt", n, " ", floor(agm(n, prime(n)))) ) } \\ Harry J. Smith, Jul 29 2009
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|