A365343 Record values of A087704.
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
Examples
a(3) = 9 because A087704(10) = 9 and A087704(k) < 9 for 2 <= k < 10.
Programs
-
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;
Extensions
a(18)-a(21) from Chai Wah Wu, Sep 02 2023
a(22)-a(29) from Martin Ehrenstein, Sep 03 2023
Comments