Why does my custom orbital gravity script not work?

Why does my orbital gravity script only pull one object at a time?

local objects = workspace.Objects

while wait() do
    local G =  6.67430 * 10 ^ -11
    for x, object in pairs(objects:GetChildren()) do
        for y, otherObject in pairs(objects:GetChildren()) do
            if otherObject ~= object then
                r = otherObject.CFrame.p - object.CFrame.p
                F = G * object:GetMass()+otherObject:GetMass() / r.Magnitude  ^ 2
                object.BodyForce.Force = F * r.Unit
            end
        end

    end
end