%I #22 May 05 2024 03:37:03
%S 0,5,25,375,625,59375,390625,859375,62890625,443359375,6650390625,
%T 49755859375,746337890625,6195068359375,92926025390625,
%U 893890380859375,8408355712890625,26125335693359375,891880035400390625,8378200531005859375,25673007965087890625
%N Fractional part of (3/2)^n without the decimal point.
%D G. Choquet, Répartition des nombres k(3/2)^n, mesures et ensembles associés, C.R. Acad. Sci. Paris, 290 (31 mars 1980), pp. 575-580.
%D G. Choquet, Construction effective de suites (k(3/2)^n). Etude des mesures (3/2)-stables, C.R. Acad. Sci. Paris, 291 (29 septembre 1980), pp. 69-74.
%H J. C. Lagarias, <a href="http://www.cecm.sfu.ca/organics/papers/lagarias/paper/html/paper.html">Fractional parts of (3/2)^k</a>
%H A. D. Pollington, <a href="https://gallica.bnf.fr/ark:/12148/bpt6k98224180/f467.item">Progressions arithmétiques généralisées et le problème des (3/2)^n</a>, C. R. Acad. Sci. Paris, 292 (16 février 1981), pp. 383-384.
%e a(4) = 625 because (3/2)^4 = 5.0625.
%p for n from 1 to 20 do: Digits:=30:x:= 1.5 ^n:y:=floor((x-floor(x))*10^n): printf(`%d, `,y):
%p od:
%t Table[FractionalPart[(3/2)^n]*10^n, {n, 0, 30}] (* _T. D. Noe_, Jan 18 2012 *)
%Y Cf. A170827, A170828.
%K nonn,base
%O 0,2
%A _Michel Lagneau_, Jan 16 2012