cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-2 of 2 results.

A245404 Number of nonnegative integers with property that their base 7/2 expansion (see A024639) has n digits.

Original entry on oeis.org

7, 21, 70, 245, 861, 3010, 10535, 36876, 129066, 451731, 1581055, 5533696, 19367936, 67787776, 237257216, 830400256, 2906400896, 10172403136, 35603410976, 124611938416, 436141784456, 1526496245596, 5342736859586, 18699579008551, 65448526529925, 229069842854741
Offset: 0

Views

Author

James Van Alstine, Jul 21 2014

Keywords

Examples

			The numbers 7-27 are represented by 20, 21, 22, 23, 24, 25, 26, 40, 41, 42, 43, 44, 45, 46, 60, 61, 62, 63, 64, 65, 66 respectively in base 7/2. These are the only integers with two digits, and so a(2)=21.
		

Crossrefs

Programs

  • Sage
    A=[1]
    for i in [1..60]:
        A.append(ceil((7-2)/2*sum(A)))
    [7*x for x in A]

A245342 Sum of digits of n written in fractional base 7/2.

Original entry on oeis.org

0, 1, 2, 3, 4, 5, 6, 2, 3, 4, 5, 6, 7, 8, 4, 5, 6, 7, 8, 9, 10, 6, 7, 8, 9, 10, 11, 12, 3, 4, 5, 6, 7, 8, 9, 5, 6, 7, 8, 9, 10, 11, 7, 8, 9, 10, 11, 12, 13, 4, 5, 6, 7, 8, 9, 10, 6, 7, 8, 9, 10, 11, 12, 8, 9, 10, 11, 12, 13, 14, 10, 11, 12, 13, 14, 15, 16, 7
Offset: 0

Views

Author

Hailey R. Olafson, Jul 18 2014

Keywords

Comments

The base 7/2 expansion is unique and thus the sum of digits function is well-defined.

Examples

			In base 7/2 the number 14 is represented by 40 and so a(14) = 4 + 0 = 4.
		

Crossrefs

Programs

  • Mathematica
    a[n_] := a[n] = If[n == 0, 0, a[2 * Floor[n/7]] + Mod[n, 7]]; Array[a, 100, 0] (* Amiram Eldar, Jul 31 2025 *)
  • PARI
    a(n) = if(n == 0, 0, a(n\7 * 2) + n % 7); \\ Amiram Eldar, Jul 31 2025
  • Sage
    # uses [basepqsum from A245355]
    [basepqsum(7,2,w) for w in [0..200]]
    

Formula

a(n) = A007953(A024639(n)).
Showing 1-2 of 2 results.