OFFSET
0,3
FORMULA
To represent a number in base 7, if a digit exceeds 6, subtract 7 and carry 1. In the fractional base 7/2, subtract 7 and carry 2.
EXAMPLE
From Alonso del Arte, Apr 21 2019: (Start)
The integers 0 through 6 are written with the digits 0 through 6.
Then, since b = 7/2 is written as 10, and 7 is twice 7/2, 7 is 20 in base 7/2, and therefore a(7) = 20.
a(28) = 210 since 2 * (7/2)^2 + 1 * (7/2) = 2 * 49/4 + 1 * 7/2 = 98/4 + 14/4 = 112/4 = 28.
(End)
MATHEMATICA
Select[Table[FromDigits[IntegerDigits[n, 7]], {n, 0, 230}], IntegerQ[FromDigits[IntegerDigits[#], 7/2]] &] (* Alonso del Arte, Apr 21 2019 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
STATUS
approved