Head scaling

[Vend]

Is there any way to replace default player head with another model? I'm trying to do it with my script, but new model's head is cut with default.

Here is my code:

for k,ent in pairs(player.GetAll()) do
	local rag = ClientsideModel("models/monk.mdl")
	rag:AddEffects(EF_BONEMERGE)
	rag:SetParent(ent)

	ent:ManipulateBoneScale(6, vector_origin)
end