login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A163808 Write n in binary. Place a 0 right of every 1 without a 0 right of it. a(n) = the decimal value of the result. 2
2, 2, 10, 4, 10, 10, 42, 8, 18, 10, 42, 20, 42, 42, 170, 16, 34, 18, 74, 20, 42, 42, 170, 40, 82, 42, 170, 84, 170, 170, 682, 32, 66, 34, 138, 36, 74, 74, 298, 40, 82, 42, 170, 84, 170, 170, 682, 80, 162, 82, 330, 84, 170, 170, 682, 168, 338, 170, 682, 340, 682, 682, 2730 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

All terms are even.

LINKS

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

EXAMPLE

13 in binary is 1101. The first and last 1 each do not have a 0 right of them. So place a 0 after the first 1 and after the last 1 so as to get 101010. a(13) is the decimal equivalent of 101010, which is 42.

MATHEMATICA

f[n_Integer]:=Module[{l=IntegerDigits[n, 2]//.{a___, 1, 1, b___}->{a, 1, 0, 1, b}}, If[Last[l]==1, l=Append[l, 0], l]; FromDigits[l, 2]]; Table[f[i], {i, 60}] (* Harvey P. Dale, Aug 13 2009 *)

CROSSREFS

Cf. A163809.

Sequence in context: A339481 A163937 A083457 * A223126 A127058 A242002

Adjacent sequences: A163805 A163806 A163807 * A163809 A163810 A163811

KEYWORD

base,nonn

AUTHOR

Leroy Quet, Aug 04 2009

EXTENSIONS

Additional terms provided. Harvey P. Dale, Aug 12 2009

More terms from Sean A. Irvine, Nov 05 2009

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified February 5 03:48 EST 2023. Contains 360082 sequences. (Running on oeis4.)