A087706 - OEIS

%I #13 Sep 02 2023 11:26:58

%S 1,1,2,7,2,6,7,3,181,6,4,7,21,5,181,42,6,17,11,7,12,21,8,482,181,9,42,

%T 16,10,17,81,11,31,32,12,56,21,13,22,482,14,181,67,15,42,26,16,27,46,

%U 17,132,81,18,232,31,19,32,417,20

%N A087705/5.

%o (Python)

%o from fractions import Fraction

%o def A087706(n):

%o     x = Fraction(n,1)

%o     while x.denominator > 1 or x<=n:

%o         x = Fraction(5*x.__floor__(),3)

%o     return int(x)//5 # _Chai Wah Wu_, Sep 01 2023

%K nonn

%O 2,3

%A _N. J. A. Sloane_, Sep 29 2003