cp's OEIS Frontend

A184909 a(n) = n + floor(n*s/r) + floor(n*t/r), where r=2^(1/5), s=r^2, t=r^3.

%I A184909 #22 Jan 18 2025 19:51:30
%S A184909 3,6,9,13,16,19,24,27,30,34,37,40,44,48,51,55,58,61,65,68,72,76,79,82,
%T A184909 85,89,93,96,100,103,106,110,113,117,121,124,127,131,134,137,142,145,
%U A184909 148,152,155,158,162,166,169,172,176,179,182,187,190,193,197,200,203,207
%N A184909 a(n) = n + floor(n*s/r) + floor(n*t/r), where r=2^(1/5), s=r^2, t=r^3.
%t A184909 r = 2^(1/5); s = r^2; t = r^3;
%t A184909 a[n_] := n + Floor[n*s/r] + Floor[n*t/r];
%t A184909 b[n_] := n + Floor[n*r/s] + Floor[n*t/s];
%t A184909 c[n_] := n + Floor[n*r/t] + Floor[n*s/t];
%t A184909 Table[a[n], {n, 1, 120}]  (* A184909 *)
%t A184909 Table[b[n], {n, 1, 120}]  (* A184910 *)
%t A184909 Table[c[n], {n, 1, 120}]  (* A184911 *)
%t A184909 (* _Clark Kimberling_, Jan 18 2025 *)
%Y A184909 Cf. A005531, A005533, A011093.
%Y A184909 Cf. A184910, A184911, A378142, A378185, A379510.
%K A184909 nonn
%O A184909 1,1
%A A184909 _Clark Kimberling_, Jan 25 2011
%E A184909 Definition in name corrected by _Clark Kimberling_, Jan 18 2025