Decrease Length And Breadth Calculator With Pi Function In R