Remova os roteados r

rownames(data) <- c()
Gifted Gorilla