Advanced Search

Question: Asymptotic approximation help

Question:Asymptotic approximation help

Adam Ledger 360 Maple
June 18 2018
0

Hello I don't mean this to the discredit of any others, and attempted to use the "contact user" feature, but the emails bounced, anyway I was hoping to get the user @Carl Love or @acer to assist me with this subject https://math.stackexchange.com/questions/2814343/finding-a-better-approximation-to-a-prime-number-relation

with(numtheory):

q := proc (h) options operator, arrow; min(`minus`(divisors(h*floor(ithprime(h)/h)), {1})) end proc;

DATA := [seq([h, simplify((h*igcd(h, h*q(h))-floor(sqrt(h))*igcd(floor(sqrt(h)), q(h)))^(1/2), 'radical')], h = 1 .. 300)];

 


plots[:-pointplot](DATA, color = "Black");
 

 

 
Please Wait...