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 A248729 #19 Dec 27 2024 13:01:32
%S A248729 1,1,2,4,8,15,27,48,86,152,266,463,806,1400,2429,4212,7301,12651,
%T A248729 21918,37969,65771,113926,197332,341797,592018,1025414,1776077
%N A248729 Number of digits in the decimal expansion of the number of partitions of 3^n.
%F A248729 a(n) = A055642(A248728(n)). - _R. J. Mathar_, Nov 17 2014
%t A248729 f[n_] := Floor[ Log[10, PartitionsP[ 3^n]] + 1]; Table[ f@n, {n, 0, 30}]
%t A248729 IntegerLength[PartitionsP[3^Range[0,30]]] (* _Harvey P. Dale_, Sep 05 2023 *)
%o A248729 (PARI) a(n) = #Str(numbpart(3^n)); \\ _Michel Marcus_, Oct 13 2014
%o A248729 (Magma) [Floor(Log(10,(NumberOfPartitions(3^n))))+1: n in [0..12]]; // _Vincenzo Librandi_, Oct 13 2014
%Y A248729 Cf. A129490, A248731, A248733, A248735, A077644, A248736, A248728.
%K A248729 nonn,base,more
%O A248729 0,3
%A A248729 _Robert G. Wilson v_, Oct 12 2014