A105425 Interpret A105424 as a binary sequence and convert to decimal.

0, 1, 2, 4, 5, 8, 10, 16, 17, 18, 20, 21, 32, 34, 36, 37, 40, 42, 64, 65, 66, 68, 69, 72, 74, 80, 81, 82, 84, 85, 128, 130, 132, 133, 136, 138, 144, 145, 146, 148, 149, 160, 162, 164, 165, 168, 170, 256, 257, 258, 260, 261, 264, 266, 272, 273, 274

Offset: 0

Author

Bryan Jacobs (bryanjj(AT)gmail.com), Apr 08 2005

Keywords

• nonn
• base

Comments

See A105424 for further information. - N. J. A. Sloane, Mar 01 2021

Links

• Rémy Sigrist, Table of n, a(n) for n = 0..10000
• Rémy Sigrist, PARI program for A105425

Crossrefs

Cf. A105424.

Programs

Mathematica

A105425[n_]:=FromDigits[First[RealDigits[n,GoldenRatio,Floor[Log[GoldenRatio,Max[n,1]]]+1]],2];Array[A105425,100,0] (* Paolo Xausa, Oct 20 2023 *)

PARI

See Links section.