_Amarnath Murthy (amarnath_murthy(AT)yahoo.com), _, Jan 07 2002
_Amarnath Murthy (amarnath_murthy(AT)yahoo.com), _, Jan 07 2002
More terms from _Robert G. Wilson v (rgwv(AT)rgwv.com), _, Jan 09 2002
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
1,1
a(4) = floor[9111315/1357] = floor[6714.30729550478997789240972733972] = 6714.
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} ]
easy,base,nonn
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Jan 07 2002
More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Jan 09 2002
approved