|
Search: id:A103122
|
|
|
| A103122 |
|
Define a 1-1 correspondence between the integers Z and the nonnegative integers N by f(n) = A102370(n) if n >= 0, f(n) = A102371(-n) if n < 0; sequence gives a(n) = f^(-1)(n) for n >= 0. |
|
+0
4
|
|
| 0, -1, -2, 1, 4, 3, 2, -3, 8, 7, 6, 9, -4, 11, 10, 5, 16, 15, 14, 17, 20, 19, 18, 13, 24, 23, 22, 25, 12, -5, 26, 21, 32, 31, 30, 33, 36, 35, 34, 29, 40, 39, 38, 41, 28, 43, 42, 37, 48, 47, 46, 49, 52, 51, 50, 45, 56, 55, 54, 57, 44, 27, -6, 53, 64, 63, 62, 65, 68
(list; graph; listen)
|
|
|
OFFSET
|
0,3
|
|
|
COMMENT
|
A 1-1 map from the nonnegative integers to all integers.
|
|
REFERENCES
|
David Applegate, Benoit Cloitre, Philippe DELEHAM and N. J. A. Sloane, Sloping binary numbers: a new sequence related to the binary numbers, J. Integer Seq. 8 (2005), no. 3, Article 05.3.6, 15 pp.
|
|
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].
|
|
PROGRAM
|
(PARI) A103122(n)=if(n<0, 0, s=-n; while(abs(if(sign(s)+1, 2^s-1/2-1/2*sum(k=0, s, (-1)^floor((s+k)/2^k)*2^k), 2^(-s-1)-1/2+1/2*sum(k=0, -s-1, (-1)^floor((-s-1-k)/2^k)*2^k))-n)>0, s++); s) (Cloitre)
|
|
CROSSREFS
|
Sequence in context: A082497 A065620 A104895 this_sequence A087850 A087849 A075015
Adjacent sequences: A103119 A103120 A103121 this_sequence A103123 A103124 A103125
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
njas, Mar 24 2005
|
|
EXTENSIONS
|
More terms from Benoit Cloitre, Mar 29 2005
|
|
|
Search completed in 0.002 seconds
|
