The OEIS is supported by the many generous donors to the OEIS Foundation.
%I #12 Sep 07 2022 19:49:06
%S 11,11,12,106,1024,1120,10720,105040,1040320,10362880,103628800,
%T 1039916800,10479001600,106227020800,10087178291200,101307674368000,
%U 1020922789888000,10355687428096000,1006402373705728000
%N a(n) = n concatenated with n! divided by n.
%e a(14) = 106227020800.
%e 14 concatenated with 14! is 1487178291200 and 1487178291200/14 = 106227020800.
%p c:=proc(x,y) local s: s:=proc(m) nops(convert(m,base,10)) end: x*10^s(y)+y: end: a:=n->c(n,n!)/n: seq(a(n),n=1..22); # c yields the concatenation of two positive integers # _Emeric Deutsch_, Aug 07 2005
%t Table[FromDigits[Join[IntegerDigits[n],IntegerDigits[n!]]]/n,{n,20}] (* _Harvey P. Dale_, Sep 07 2022 *)
%o (PARI) a(n) = fromdigits(concat(digits(n), digits(n!)))/n; \\ _Michel Marcus_, Aug 18 2019
%Y Cf. A110414.
%K base,easy,nonn
%O 1,1
%A _Amarnath Murthy_, Aug 01 2005
%E More terms from _Emeric Deutsch_, Aug 07 2005