OFFSET
0,2
COMMENTS
FORMULA
a(n) = n + A055642(n).
EXAMPLE
a(10) = 10 + 2 = 12.
MATHEMATICA
a[0] = 1; a[n_] := n + IntegerLength[n]; Array[a, 100, 0] (* Amiram Eldar, Sep 25 2020 *)
PROG
(Magma) [1] cat [n + #Intseq(n): n in [1..100]]
(PARI) a(n) = if (n==0, 1, n + #digits(n)); \\ Michel Marcus, Sep 26 2020
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Jaroslav Krizek, Sep 25 2020
STATUS
approved