A067093 Floor[X/Y] where X = concatenation of (n+1)-st odd number through the 2n-th odd number and Y = concatenation of first n odd numbers.

3, 4, 58, 6714, 81975, 96852, 111729, 126607, 141484, 156361, 171238, 186116, 200993, 215870, 230748, 245625, 260502, 275379, 290257, 305134, 320011, 334889, 349766, 364643, 379520, 39439811, 4092753962, 424152673322, 43902995043838

Offset: 1

Author

Amarnath Murthy, Jan 07 2002

Keywords

• easy
• base
• nonn

Examples

			a(4) = floor[9111315/1357] = floor[6714.30729550478997789240972733972] = 6714.
		

Crossrefs

Cf. A067088, A067089, A067090, A067091, A067092.

Programs

Mathematica

f[n_] := (k = 1; x = y = "0"; While[k < n + 1, x = StringJoin[x, ToString[2n + 2k -1]]; y = StringJoin[y, ToString[2k - 1]]; k++ ]; Return[ Floor[ ToExpression[x] / ToExpression[y]]] ); Table[ f[n], {n, 1, 32} ]

Extensions

More terms from Robert G. Wilson v, Jan 09 2002