

A170827


Sum of digits after the decimal point in the decimal expansion of (3/2)^n.


4



0, 5, 7, 15, 13, 29, 25, 37, 38, 43, 42, 67, 60, 67, 60, 85, 73, 77, 71, 79, 95, 107, 106, 100, 95, 120, 95, 137, 143, 146, 138, 140, 147, 166, 172, 163, 172, 177, 180, 193, 158, 174, 171, 184, 177, 188, 188, 223, 212, 241, 213, 198, 243, 229, 236, 245, 278, 281, 305, 304
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

0,2


COMMENTS

Terms which appear more than once: 60, 67, 95, 172, 177, 188, 330, 346, 350, 377, 407, ..., .  Robert G. Wilson v, Mar 10 2015
First term to appear n times: 0, 60, 95, 3016, 31258, ..., and these happen at {0}, {13, 15}, {21, 25, 27}, {651, 675, 678, 690}, {6917, 6930, 6970, 7001, 7054}, ..., .  Robert G. Wilson v, Mar 10 2015


LINKS

Harvey P. Dale, Table of n, a(n) for n = 0..1000


EXAMPLE

1.0
1.5
2.25
3.375
5.0625
7.59375
11.390625
17.0859375
25.62890625


MATHEMATICA

td[n_]:=Module[{rd=RealDigits[(3/2)^n]}, Total[Drop[rd[[1]], rd[[2]]]]]; Array[td, 60, 0] (* Harvey P. Dale, Dec 13 2011 *)


PROG

(PARI) a(n) = sumdigits(lift(Mod(15, 10^n)^n)) \\ Jianing Song, Sep 28 2022


CROSSREFS

Cf. A002379, A170828.
Sequence in context: A314353 A043099 A030755 * A314354 A314355 A314356
Adjacent sequences: A170824 A170825 A170826 * A170828 A170829 A170830


KEYWORD

nonn,base


AUTHOR

Michel Lagneau, Dec 28 2009


EXTENSIONS

Edited by N. J. A. Sloane, Dec 28 2009


STATUS

approved



