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.

A128546 Inrepfigit (INverse REPetitive FIbonacci-like diGIT) numbers (or Htiek numbers).

Original entry on oeis.org

17, 21, 25, 42, 63, 84, 143, 286, 2355, 5821, 6618, 11709, 12482, 33747, 39571, 129109, 466957, 1162248, 1565166, 1968084, 3636638, 3853951, 4898376, 6065280, 13443745, 13933175, 17118698, 22421197, 24153462377
Offset: 1

Views

Author

Pierre Karpman (pierre.karpman(AT)laposte.net), Oct 23 2007

Keywords

Comments

This sequence is similar to A007629 (Keith numbers). It consists of the numbers n>9 with the following property: n is a term of the sequence S whose first k terms are the k digits of n (with the first term equal to the units digit) and with S(n+1)=sum of the k previous terms.

Examples

			42 is in the sequence because the terms of the sequence it creates are 2, 4, 6, 10, 16, 26, 42, ...
		

Crossrefs

Cf. A007629.
Cf. A097060 (reverse of these numbers).

Programs

  • Mathematica
    iKeithQ[n_Integer] := Module[{b = Reverse[IntegerDigits[n]], s, k = 0}, s = Total[b]; While[s < n, AppendTo[b, s]; k++; s = 2*s - b[[k]]]; s == n]; Select[Range[10, 100000], iKeithQ] (* T. D. Noe, Mar 15 2011 *)