A063004 Difference between 2^n and the next larger or equal power of 3.

0, 1, 5, 1, 11, 49, 17, 115, 473, 217, 1163, 139, 2465, 11491, 3299, 26281, 111611, 46075, 269297, 7153, 545747, 2685817, 588665, 5960299, 26269505, 9492289, 62031299, 253202761, 118985033, 625390555, 88519643, 1339300753

Offset

0,3

Links

Table of n, a(n) for n=0..31.

Formula

a(n) = 3^ceiling(log_3(2^n)) - 2^n.

Mathematica

dp23[n_]:=Module[{t=2^n}, 3^Ceiling[Log[3, t]]-t]; Array[dp23, 40, 0] (* Harvey P. Dale, Nov 20 2015 *)

Prog

(PARI) for(n=1, 50, print1(3^ceil(log(2^n)/log(3))-2^n", "))

Crossrefs

Cf. A056577, A063003, A063005.

Sequence in context: A132000 A132001 A113261 * A351573 A347135 A146993

Adjacent sequences: A063001 A063002 A063003 * A063005 A063006 A063007

Keyword

easy,nonn

Author

Jens Voß, Jul 02 2001

Extensions

More terms from Ralf Stephan, Mar 21 2003

Status

approved