Character removing help?

Since you told me you wanted to Change the Transparency of the Player's Character Ligaments instead of removing it, so I made some adjustment to the script!

game.Players.PlayerAdded:connect(function(Player)--The Function listen for the PlayerAdded event.
    local Character = game.Workspace:WaitForChild(Player.Name)
     for _,v in pairs (Character:GetChildren()) do--Loops through the Player's Character
    if v:IsA("Part") then--Check if any Object inside the Character is ClassNamed "Part"
    v.Transparency = 1--If its ClassName is "Part" then.    
        end
    end 
wait(1)
    for _,v in pairs (Character:GetChildren()) do--Loops through the Players Character
    if v:IsA("Hat") then--Check if any Object inside the Character is ClassNamed "Hat"
    v:Destroy()--If It is then DESTROY IT MUHAHAH
        end
    end 
    local Decal = Character.Head:WaitForChild("face")--Wait til there's a Face inside of the Character's Head
    Decal:Destroy()--Destroys the face MUAHAH.
end)