login

Revision History for A067093

(Bold, blue-underlined text is an addition; faded, red-underlined text is a deletion.)

Showing all changes.
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.
(history; published version)
#3 by N. J. A. Sloane at Thu Dec 05 19:55:07 EST 2013
AUTHOR

_Amarnath Murthy (amarnath_murthy(AT)yahoo.com), _, Jan 07 2002

Discussion
Thu Dec 05
19:55
OEIS Server: https://oeis.org/edit/global/2075
#2 by Russ Cox at Fri Mar 30 17:30:38 EDT 2012
EXTENSIONS

More terms from _Robert G. Wilson v (rgwv(AT)rgwv.com), _, Jan 09 2002

Discussion
Fri Mar 30
17:30
OEIS Server: https://oeis.org/edit/global/156
#1 by N. J. A. Sloane at Fri May 16 03:00:00 EDT 2003
NAME

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.

DATA

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,1

EXAMPLE

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

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} ]

CROSSREFS
KEYWORD

easy,base,nonn

AUTHOR

Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Jan 07 2002

EXTENSIONS

More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Jan 09 2002

STATUS

approved