%I #40 Nov 14 2021 01:35:42
%S 0,0,0,1,1,2,3,4,5,6,7,8,9,10,11,12,13,15,16,17,18,20,21,22,24,25,27,
%T 28,29,31,32,34,35,37,38,40,42,43,45,46,48,50,51,53,54,56,58,59,61,63,
%U 64,66,68,70,71,73,75,77,78,80,82,84,85,87,89,91,93,95,96,98,100
%N a(n) = floor(log_10(Pi*n!)).
%F a(n) = floor(log_10(Pi*n!).
%F a(n) = floor(A053511 + log_10(n!)).
%t Array[Floor@ Log10[Pi*#!] &, 71, 0] (* _Michael De Vlieger_, Nov 05 2021 *)
%Y Cf. A004216, A034886, A053511.
%K nonn
%O 0,6
%A _Paul F. Marrero Romero_, Nov 05 2021