A067091 Floor(X/Y) where X = concatenation of the (n+1)-st even number through the (2n)-th even number and Y = concatenation of first n even numbers.
2, 2, 329, 4101, 4919, 5737, 6556, 7374, 8193, 9012, 9830, 10649, 11467, 12286, 13104, 13923, 14741, 15560, 16378, 17197, 18015, 18834, 19652, 20471, 212899, 22108437, 2292696195, 237454867452, 24564011532104, 2538253631893694
Offset: 1
Examples
a(4) = floor(10121416/2468) = floor(4101.05996758508914100486223662885) = 4101. a(7) = floor(16182022242628/2468101214) = floor(6556.4662222268166673) = 6556.
Links
- Hans Havermann, First 1000 terms
Programs
-
Mathematica
z[n_] := Block[{a = "", m = n}, While[ Length[m] > 0, a = StringJoin[a, ToString[m[[1]]]]; m = Drop[m, 1]]; ToExpression[a]]; Table[ Floor[ z[Table[2i, {i, n + 1, 2n}]] / z[ Table[2i, {i, 1, n}]]], {n, 1, 30}]
Extensions
Edited by N. J. A. Sloane and Robert G. Wilson v, Jun 14 2002