How would I reduce the lag from this script and make it run smoothly?

local enemy = script.Parent
local pathfinding = game:GetService('PathfindingService')
local rs = game:GetService('RunService')
table.foreach(game.Workspace:GetChildren(),
    function(i,v)
        player = game.Players:FindFirstChild(v.Name)
        if player ~= nil then
            rs.Heartbeat:connect(function()
                wait(1)
                local distance = (enemy.Torso.Position-v.Torso.Position).magnitude
                if distance <= 75 and distance >= 2 then
                    searching = false
                    function moveto(path)
                        local points = path:GetPointCoordinates()
                        for _, point in pairs(points) do
                            enemy.Humanoid:MoveTo(point)
                            repeat
                                far = (enemy.Torso.Position-point).magnitude
                                wait()
                            until far <= 3
                        end
                    end
                    path = pathfinding:ComputeRawPathAsync(enemy.Torso.Position, v.Torso.Position, 500)
                    moveto(path)
                end
            end)
        end
end)