sum i=1 to (Floor[nlog 2/ln3]) 3^i/(i ln3)