login
A018060
Powers of fourth root of 6 rounded down.
1
1, 1, 2, 3, 6, 9, 14, 23, 36, 56, 88, 138, 216, 338, 529, 828, 1296, 2028, 3174, 4968, 7776, 12170, 19047, 29810, 46656, 73020, 114283, 178863, 279936, 438123, 685700, 1073179, 1679616, 2628741, 4114202, 6439074, 10077696, 15772446, 24685212, 38634446
OFFSET
0,3
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 0..5140
FORMULA
a(n) = floor(6^(n/4)). - Wesley Ivan Hurt, Aug 28 2015
MAPLE
A018060:=n->floor(6^(n/4)): seq(A018060(n), n=0..40); # Wesley Ivan Hurt, Aug 28 2015
MATHEMATICA
Table[Floor[6^(n/4)], {n, 0, 40}] (* Wesley Ivan Hurt, Aug 28 2015 *)
PROG
(Magma) [Floor(6^(n/4)) : n in [0..40]]; // Wesley Ivan Hurt, Aug 28 2015
(PARI) a(n)=if(n%2, sqrtnint(6^n, 4), if(n%4, sqrtint(6^(n/2)), 6^(n/4))) \\ Charles R Greathouse IV, Aug 29 2015
CROSSREFS
Sequence in context: A134004 A123631 A228364 * A115856 A147007 A146937
KEYWORD
nonn,easy
STATUS
approved