cp's OEIS Frontend

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.

A048148 Distinct elements of A045948.

This page as a plain text file.
%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