|
3, 11, 23, 43, 53, 71, 107, 229, 241, 269, 293, 313, 643, 701, 857, 883, 1109, 1361, 1601, 1693, 1697, 1721, 1867, 2267, 2621, 2719, 2767, 2789, 2971, 3067, 3137, 3169, 3529, 3533, 3557, 3739, 3767, 4007, 4093, 4139, 4153, 4219, 4337, 4423, 4447, 4451, 4517, 4663, 4787, 4943, 5279, 5387, 5501
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
|
|
MAPLE
|
f:= proc(n) local t, i, s;
t:= ithprime(n);
add(floor(t/ ithprime(i)), i=1..n-1)
end proc:
select(isprime, map(f, [$1..100]));
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|