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 A048148 #35 Jul 02 2025 16:01:57 %S A048148 1,2,4,12,24,120,360,720,5040,10080,30240,332640,1663200,3326400, %T A048148 43243200,129729600,259459200,4410806400,30875644800,586637251200, %U A048148 1173274502400,26985313555200,134926567776000,404779703328000,11738611396512000,363896953291872000 %N A048148 Distinct elements of A045948. %C A048148 A001222(a(n)) = n - 1. - _Eric Desbiaux_, Apr 05 2018 %H A048148 Chai Wah Wu, <a href="/A048148/b048148.txt">Table of n, a(n) for n = 1..412</a> (terms 1..237 from Michael De Vlieger) %F A048148 A025476(n) = a(n+1) / a(n). - _Eric Desbiaux_, Jun 22 2013 %t A048148 Map[Function[m, Exp[Sum[MangoldtLambda@ n, {n, m}]]/Product[x, {x, Prime@ Range@ PrimePi@ m}]], Select[Range[10^3], Or[# == 1, And[PrimePowerQ@ #, ! PrimeQ@ #]] &] ] (* _Michael De Vlieger_, Aug 01 2017, after _Fred Daniel Kline_ at A045948 *) %o A048148 (Python) %o A048148 # uses program from A025476 %o A048148 from math import prod %o A048148 def A048148(n): return prod(A025476(i) for i in range(1,n)) # _Chai Wah Wu_, Aug 15 2024 %Y A048148 Cf. A003418, A034386, A002110, A000142, A049536. %K A048148 nonn %O A048148 1,2 %A A048148 _Labos Elemer_ %E A048148 More terms from _James Sellers_, May 03 2000 %E A048148 More terms from _Michael De Vlieger_, Aug 01 2017