login
a(n) = floor[ X/Y], where X = concatenation of first n factorials and Y = concatenation of first n natural numbers.
2

%I #8 Jun 09 2020 11:49:27

%S 1,1,1,10,1022,102256,102255452,1022553862210,102255378766606673,

%T 10225537868377981588347,10225537868286872045185666318,

%U 102255378682858781228966381713174081,10225537868285867355405173700779791589867289

%N a(n) = floor[ X/Y], where X = concatenation of first n factorials and Y = concatenation of first n natural numbers.

%H Harvey P. Dale, <a href="/A067104/b067104.txt">Table of n, a(n) for n = 1..44</a>

%e a(5) = floor [12624120/12345] = floor[1022.60996354799513973268529769137] = 1022.

%t Table[Floor[FromDigits[Flatten[IntegerDigits/@(Range[n]!)]]/FromDigits[ Flatten[IntegerDigits/@Range[n]]]],{n,15}] (* _Harvey P. Dale_, Jun 09 2020 *)

%Y Cf. A067091, A067092, A067093, A067094, A067095, A067096, A067097, A067098, A067099, A067100, A067101, A067102, A067103.

%K easy,nonn,base

%O 1,4

%A _Amarnath Murthy_, Jan 07 2002

%E Corrected and extended by Antonio G. Astudillo (afg_astudillo(AT)lycos.com), Apr 01 2003

%E Edited by _Charles R Greathouse IV_, Apr 27 2010