[go: up one dir, main page]

login
A365343
Record values of A087704.
3
2, 4, 9, 10, 12, 17, 23, 29, 30, 32, 34, 38, 39, 40, 42, 43, 44, 47, 49, 52, 56, 57, 61, 62, 66, 71, 73, 75, 80
OFFSET
1,1
COMMENTS
Numbers v = A087704(k) such that A087704(m) < v for 2 <= m < k.
FORMULA
a(n) = A087704(A365342(n)).
EXAMPLE
a(3) = 9 because A087704(10) = 9 and A087704(k) < 9 for 2 <= k < 10.
MAPLE
g:= x -> 5/3 * floor(x):
h:= proc(n) local i, k;
k:= g(n);
for i from 1 while not (k::integer and k > n) do k:= g(k) od:
i
end proc:
M:= 2: A:= 2: count:= 1:
for n from 3 while count < 17 do
v:= h(n);
if v > M then count:= count+1; A:= A, v; M:= v fi;
od:
A;
CROSSREFS
Sequence in context: A178488 A226821 A047465 * A002258 A252760 A191766
KEYWORD
nonn,more
AUTHOR
Robert Israel, Sep 01 2023
EXTENSIONS
a(18)-a(21) from Chai Wah Wu, Sep 02 2023
a(22)-a(29) from Martin Ehrenstein, Sep 03 2023
STATUS
approved