Add `row.names` arg to check for character column
Implement function to correct expression data by principal components