A152756 Bisection of A000533.
1, 101, 10001, 1000001, 100000001, 10000000001, 1000000000001, 100000000000001, 10000000000000001, 1000000000000000001, 100000000000000000001, 10000000000000000000001
Offset: 1
Examples
n ..... a(n) 1 ....... 1 2 ...... 101 3 ..... 10001 4 .... 1000001 5 ... 100000001
Links
- Index entries for linear recurrences with constant coefficients, signature (101,-100).
Programs
-
Magma
[1] cat [10^(2*n)+1: n in [1..15]]; // Vincenzo Librandi, Jul 27 2014
-
Mathematica
A152756[n_] := If[n == 1, 1, 100^(n-1) + 1]; Array[A152756, 20] (* or *) LinearRecurrence[{101, -100}, {1, 101, 10001}, 20] (* Paolo Xausa, Oct 05 2024 *)
Formula
Except the first term, a(n)=10^(2n-2)+1. - Robert G. Wilson v, Dec 14 2008
G.f.: x*(1-100*x^2)/(1-x)/(1-100*x). - Robert Israel, Jul 27 2014
Comments