extractEigen

Extract gene-level Eigen-vectors for PCs of interest and calculate percent variance.

extractEigen(object, component)

Arguments

object

A geneda object containing PCA results in the DimReduction slot

component

Principal component to use (i.e., PC1)

Value

A data-frame containing gene loading information and percent variation per gene

Examples

# \donttest{
mock_norm <- matrix(rnorm(12, mean = 0, sd = 2), nrow = 4, ncol = 3)
colnames(mock_norm) <- paste0("Sample", 1:3)
rownames(mock_norm) <- paste0("Gene", 1:4)
mock_meta <- data.frame(condition = c("A","B","A"), row.names = colnames(mock_norm))
obj <- GenEDA(normalized = mock_norm, metadata = mock_meta)
extractEigen(object = obj, component = "PC1")
#> DimReduction slot is empty. Please use RunPCA.
#> [1] PctVar
#> <0 rows> (or 0-length row.names)
# }