Perimeter Of A Regular Polygon By Inradius And N

function Perimeter_Of_A_Regular_Polygon_By_Inradius_And_N(r,N)= 
  2*N*r*tan(180/N);