|
|
A002379
|
|
a(n) = floor(3^n / 2^n).
(Formerly M0666 N0245)
|
|
88
|
|
|
1, 1, 2, 3, 5, 7, 11, 17, 25, 38, 57, 86, 129, 194, 291, 437, 656, 985, 1477, 2216, 3325, 4987, 7481, 11222, 16834, 25251, 37876, 56815, 85222, 127834, 191751, 287626, 431439, 647159, 970739, 1456109, 2184164, 3276246, 4914369, 7371554, 11057332
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
COMMENTS
|
It is an important unsolved problem related to Waring's problem to show that a(n) = floor((3^n-1)/(2^n-1)) holds for all n > 1. This has been checked for 10000 terms and is true for all sufficiently large n, by a theorem of Mahler. [Lichiardopol]
a(n) = floor((3^n-1)/(2^n-1)) holds true at least for 2 <= n <= 305000. - Hieronymus Fischer, Dec 31 2008
a(n) is also the curve length (rounded down) of the Sierpiński arrowhead curve after n iterations, let a(0) = 1. - Kival Ngaokrajang, May 21 2014
a(n) is composite infinitely often (Forman and Shapiro). More exactly, a(n) is divisible by at least one of 2, 5, 7 or 11 infinitely often (Dubickas and Novikas). - Tomohiro Yamada, Apr 15 2017
|
|
REFERENCES
|
R. K. Guy, Unsolved Problems in Number Theory, E19.
D. H. Lehmer, Guide to Tables in the Theory of Numbers. Bulletin No. 105, National Research Council, Washington, DC, 1941, p. 82.
S. S. Pillai, On Waring's problem, J. Indian Math. Soc., 2 (1936), 16-44.
N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence).
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
|
|
LINKS
|
N. Lichiardopol, Problem 925 (BCC20.19), A number-theoretic problem, in Research Problems from the 20th British Combinatorial Conference, Discrete Math., 308 (2008), 621-630.
|
|
FORMULA
|
a(n) = b(n) - (-2/3)^n where b(n) is defined by the recursion b(0):=2, b(1):=5/6, b(n+1):=(5/6)*b(n) + b(n-1). - Hieronymus Fischer, Dec 31 2008
a(n) = (1/2)*(b(n) + sqrt(b(n)^2 - (-4)^n)) (with b(n) as defined above). - Hieronymus Fischer, Dec 31 2008
a(n) = -(1/2) + (3/2)^n + arctan(cot((3/2)^n Pi)) / Pi. - Fred Daniel Kline, Apr 14 2018
|
|
MAPLE
|
|
|
MATHEMATICA
|
x[n_] := -(1/2) + (3/2)^n + ArcTan[Cot[(3/2)^n Pi]]/Pi; Array[x, 40] (* Fred Daniel Kline, Dec 21 2017 *)
x[n_]:=Round[-(1/2) + (3^n - 1)/(2^n - 1)]; Array[x, 39, 2] (* offset n+1, Fred Daniel Kline, Apr 13 2018 *)
|
|
PROG
|
(Maxima) makelist(floor(3^n/2^n), n, 0, 50); /* Martin Ettl, Oct 17 2012 */
(Haskell)
(Python)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|