This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A248735 #16 Sep 08 2022 08:46:10 %S A248735 1,2,6,18,51,140,377,1005,2668,7069,18714,49527,131052,346746,917422, %T A248735 2427289 %N A248735 Number of digits in the decimal expansion of the number of partitions of 7^n. %F A248735 a(n) = A055642(A248734(n)). - _R. J. Mathar_, Nov 17 2014 %t A248735 f[n_] := Floor[ Log[10, PartitionsP[ 7^n]] + 1]; Table[ f@n, {n, 0, 15}] %t A248735 IntegerLength[PartitionsP[7^#]]&/@Range[0,15] (* _Harvey P. Dale_, Apr 27 2015 *) %o A248735 (Magma) [Floor(Log(10,(NumberOfPartitions(7^n))))+1: n in [0..6]]; // _Vincenzo Librandi_, Oct 13 2014 %o A248735 (PARI) a(n) = #Str(numbpart(7^n)); \\ _Michel Marcus_, Oct 16 2014 %Y A248735 Cf. A000041, A129490, A248729, A248731, A248733, A077644, A248736, A248734. %K A248735 nonn,base,more %O A248735 0,2 %A A248735 _Robert G. Wilson v_, Oct 12 2014