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.

A273283 Least prime not less than the geometric mean of all prime divisors of n counted with multiplicity.

This page as a plain text file.
%I A273283 #31 Jan 21 2022 05:06:20
%S A273283 2,3,2,5,3,7,2,3,5,11,3,13,5,5,2,17,3,19,3,5,5,23,3,5,7,3,5,29,5,31,2,
%T A273283 7,7,7,3,37,7,7,3,41,5,43,5,5,7,47,3,7,5,11,5,53,3,11,3,11,11,59,3,61,
%U A273283 11,5,2,11,5,67,5,11,5,71,3,73,11,5,5,11,5,79,3,3,11
%N A273283 Least prime not less than the geometric mean of all prime divisors of n counted with multiplicity.
%C A273283 A079870(n) <= a(n) <= A006530(n) <= n and a(n) = n iff n is prime, while a(n)= A079870(n) iff A079870(n) is prime.
%H A273283 Giuseppe Coppoletta, <a href="/A273283/b273283.txt">Table of n, a(n) for n = 2..10000</a>
%F A273283 For n >= 2, a(n) = A007918(A079870(n)).
%e A273283 a(46)=7 because 7 is the least prime not less than sqrt(2*23).
%e A273283 a(84)=5 and A273282(84)=3 because A001222(84)=4 and 3 < 84^(1/4) < 5.
%t A273283 Table[NextPrime[(Ceiling[n^(1/PrimeOmega[n])] - 1)], {n,2,50} ] (* _G. C. Greubel_, May 26 2016 *)
%o A273283 (Sage) [next_prime(ceil(n^(1/sloane.A001222(n)))-1) for n in (2..82)]
%Y A273283 Cf. A273282, A273285, A273289, A079870, A079871, A006530, A001222.
%K A273283 nonn
%O A273283 2,1
%A A273283 _Giuseppe Coppoletta_, May 19 2016