changed quick.contract.vertex.R