A033410 - OEIS

%I #13 Apr 04 2023 22:47:15

%S 90,45,30,22,18,15,12,11,10,9,8,7,6,6,6,5,5,5,4,4,4,4,3,3,3,3,3,3,3,3,

%T 2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,

%U 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0

%N a(n) = floor(90/n).

%F a(n) = floor(90/n). - _Wesley Ivan Hurt_, Feb 26 2014

%p A033410:=n->floor(90/n); seq(A033410(n), n=1..100); # _Wesley Ivan Hurt_, Feb 26 2014

%t Table[Floor[90/n], {n, 100}] (* _Wesley Ivan Hurt_, Feb 26 2014 *)

%o (PARI) a(n) = 90\n; \\ _Michel Marcus_, Feb 27 2014

%o (Magma) [Floor(90/n): n in [1..100]]; // _Wesley Ivan Hurt_, Apr 04 2023

%K easy,nonn

%O 1,1

%A _Jeff Burch_