A006287 Sum of squares of digits of ternary representation of n. (Formerly M3194)

0, 1, 4, 1, 2, 5, 4, 5, 8, 1, 2, 5, 2, 3, 6, 5, 6, 9, 4, 5, 8, 5, 6, 9, 8, 9, 12, 1, 2, 5, 2, 3, 6, 5, 6, 9, 2, 3, 6, 3, 4, 7, 6, 7, 10, 5, 6, 9, 6, 7, 10, 9, 10, 13, 4, 5, 8, 5, 6, 9, 8, 9, 12, 5, 6, 9, 6, 7

Offset

0,3

References

Jeffrey Shallit, personal communication.

N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).

Links

R. J. Mathar, Table of n, a(n) for n = 0..500

Michael Gilleland, Some Self-Similar Integer Sequences

Robert Walker, Self Similar Sloth Canon Number Sequences

Maple

A006287 := proc(n)
    local d ;
    convert(n, base, 3) ;
    add(d^2, d=%) ;
end proc: # R. J. Mathar, Jun 13 2014

Mathematica

Table[Total[IntegerDigits[n, 3]^2], {n, 0, 80}]  (* Harvey P. Dale, Apr 23 2011 *)

Crossrefs

Cf. A053735

Sequence in context: A188931 A125560 A046573 * A087225 A366619 A343404

Adjacent sequences: A006284 A006285 A006286 * A006288 A006289 A006290

Keyword

nonn,base

Author

N. J. A. Sloane.

Status

approved