|
| |
|
|
A103621
|
|
Trajectory of 7 under repeated application of the map n --> A102370(n).
|
|
3
| |
|
|
7, 9, 11, 13, 23, 25, 27, 61, 71, 73, 75, 77, 87, 89, 91, 125, 135, 137, 139, 141, 151, 153, 155, 189, 199, 201, 203, 205, 215, 217, 219, 253, 263, 265, 267, 269, 279, 281, 283, 317, 327, 329, 331, 333, 343, 345, 347, 381, 391, 393, 395, 397, 407, 409, 411, 445
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| First differences appear to be 8-periodic: 2,2,2,10,2,2,34,10.
|
|
|
LINKS
| David Applegate, Benoit Cloitre, Philippe DELEHAM and N. J. A. Sloane, Sloping binary numbers: a new sequence related to the binary numbers [pdf, ps], J. Integer Seq. 8 (2005), no. 3, Article 05.3.6, 15 pp.
|
|
|
MATHEMATICA
| f[n_] := Block[{k = 1, s = 0, l = Max[2, Floor[ Log[2, n + 1] + 2]]}, While[k < l, If[ Mod[n + k, 2^k] == 0, s = s + 2^k]; k++ ]; s + n]; NestList[f, 7, 55] (from Robert G. Wilson v Mar 30 2005)
|
|
|
CROSSREFS
| Cf. A102370, A103192, A103747.
Sequence in context: A023389 A162018 A055741 * A081239 A029612 A120165
Adjacent sequences: A103618 A103619 A103620 * A103622 A103623 A103624
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| Philippe Deleham (kolotoko(AT)wanadoo.fr), Mar 31 2005
|
|
|
EXTENSIONS
| More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Mar 30 2005
|
| |
|
|
