Question: Extracting features or gene from PCA after calculating PCA for downstream analysis
5
gravatar for krushnach80
2.9 years ago by
krushnach80850
krushnach80850 wrote:

Paper link Im quoting their lines which is as such

" We performed principal component analysis (PCA) of low-coverage sequencing data to identify genes explaining variation across cells. PCA separated the cells into groups corresponding to the source populations (Fig. 2c and Supplementary Figs. 3–5), and the genes distinguishing each group reflected the biological properties of the cell types (Supplementary Fig. 5 and Supplementary Table 3). PCA of low- and high-coverage sequencing data revealed a remarkably similar graphical distribution of analyzed cells, and the majority (78%) of the top 500 genes determined by PCA were shared between PCA performed on low- and high-coverage data (Supplementary Figs. 4 and 6 and Supplementary Table 4). "

My question is they how they are performing PCA and then finding out the components which contributes to the strongest PC and then taking out the genes for downstream analysis lets say there are gene involved in PC1 and PC2 which defines a certainly cell type and that distinguishes it, as I think for biology person like me finally i want to get the genes or gene list that are getting involved lineage or cell type

As a to test what they might be doing i did this

test<- read.csv('NON_CODING.csv',header = T,row.names = 1)

# preform PCA
pca = prcomp(t(test), center=TRUE, scale=TRUE)

then after calculating PCA i do see this in my console when I type pca

> pca
Standard deviations (1, .., p=16):
 [1] 3.826851e+01 2.080405e+01 1.568739e+01 1.349256e+01 1.119348e+01 9.980547e+00 8.365034e+00
 [8] 8.098841e+00 7.519507e+00 6.184505e+00 5.880260e+00 5.139609e+00 4.851091e+00 4.335606e+00
[15] 3.870918e+00 3.173450e-14

Rotation (n x k) = (2899 x 16):
                                       PC1           PC2           PC3           PC4
5S_rRNA                      -1.090574e-02 -2.412665e-03  1.637689e-02 -3.603865e-02
AB019441.29                  -1.928250e-02  1.821083e-03 -9.713724e-03 -1.978737e-03
ABBA01017803.1               -1.823266e-02 -3.727144e-03 -9.790131e-04 -3.937062e-02
ABC14-1080714F14.1            2.438024e-02  3.816019e-03  1.657784e-04 -7.141480e-03
ABC7-481722F1.1               2.467403e-02  2.873432e-03  3.781153e-03  3.790824e-03
AC000036.4                   -1.066777e-02  2.838305e-02  2.642673e-02 -7.998608e-03
AC000089.3                   -1.249026e-02 -7.870864e-04 -2.569602e-02 -3.165073e-03
AC000120.7                   -1.313696e-02  5.923245e-03  1.633255e-02  4.077602e-02
AC000123.4                    2.415996e-02  1.029732e-02  8.930792e-03 -1.118660e-02
AC000403.4                    8.692835e-03 -3.060170e-02  3.746839e-02 -6.968971e-03
AC002064.4                   -1.799590e-02  2.147160e-02 -2.303742e-02  7.647937e-03

Now how do i find which are the list or set of genes that gives me PC1 or PC2 so on

Any suggestion or help how to get the genes that make most difference between two major component that would be very helpful

R • 5.5k views
ADD COMMENTlink modified 5 months ago by The160 • written 2.9 years ago by krushnach80850
1
gravatar for swbarnes2
2.9 years ago by
swbarnes28.9k
United States
swbarnes28.9k wrote:

The numbers in the PC1 column are the contributions of those genes to PC1. The most extreme numbers go with the genes that are pushing that component the most. So look for the genes whose values have the highest absolute value.

ADD COMMENTlink written 2.9 years ago by swbarnes28.9k

You (the OP) asked me to comment from our other thread ( C: Adding Percentage in PCA ), however, what I have been saying is 100% in line with what swbarnes2 says. If you are wondering how to choose the 'best' genes that contribute to variation in each PC, then there is no standard cut-off to use. You can just choose the top 50, for example.

ADD REPLYlink written 2.9 years ago by Kevin Blighe66k

okay...there is no definite method to do so...I was wondering how did they arrive at 500 genes in that paper ...Then will try ...do you have any tutorial for that or answered similar question how to take out genes contributing to PCA , if you had answered in the past it would be of great help to look into it, your resources are very helpful i must say

ADD REPLYlink written 2.9 years ago by krushnach80850
1

i have not seen any main tutorial for this, as it is just a matter of ordering the loadings to each principal component and then choosing the top N genes. I am sure that this has been used in many published manuscripts but that many authors would just not fully explain what exactly they did.

ADD REPLYlink modified 23 months ago • written 2.9 years ago by Kevin Blighe66k

Yes in paper they tell they did but won't write about the exact method

so how to order those eigenvalues ?

ADD REPLYlink written 2.9 years ago by krushnach80850
2

This will give you top 50 genes to PC4:

data.frame(sort(abs(project.pca$rotation[,"PC4"]), decreasing=TRUE)[1:50])
ADD REPLYlink modified 20 months ago • written 2.9 years ago by Kevin Blighe66k
data.frame(sort(abs(project.pca$rotation[,"PC4"]), decreasing=TRUE)[1:50])

why you have mentioned "PC4"? isn;t that supposed to be PC 1 i was just wondering

ADD REPLYlink written 2.9 years ago by krushnach80850
1

Apologies, copy/paste error from a previous project where I was interested in PC4. You just need to change this to PC1. [now edited]

ADD REPLYlink modified 20 months ago • written 2.9 years ago by Kevin Blighe66k

okay I was wondering that, as always your suggestion and codes are really helpful

ADD REPLYlink written 2.9 years ago by krushnach80850

@Kevin back to the question again some doubts cropped up..so what i understand is my PC is equal to the number of variables which in my case is my sample ,so if i see my PC1 and PC2 are the one making most of the variance , so how does it change even i consider all the PC together because the same of set of genes would be having different rotation in all the sample ,im bit confused ,because even if Im taking the genes with PC1 and PC2 for my downstream analysis I take all the data set yes now I have genes which are most variable , whatever im doing is that conceptually correct ??

ADD REPLYlink written 2.1 years ago by krushnach80850

The accumulative % variation of all PCs will be 100%. PC1 will always explain the highest % variation.

If you are interested in using the loadings from PC1 and PC2, then, ideally, your samples are segregated in a way that is of clinical interest along these 2 PCs (?)

ADD REPLYlink modified 23 months ago • written 2.1 years ago by Kevin Blighe66k

certainly yes as of now i haven;t included in my analysis ,I mean im just taking the expression values for my analysis .they are segregated in terms of mutation ..

ADD REPLYlink written 2.1 years ago by krushnach80850
2

Okay, yes, each and every gene will have a value to PC1, and also to PC2, PC3, et cetera. These values are called the component loadings.

ADD REPLYlink modified 9 weeks ago • written 2.1 years ago by Kevin Blighe66k

hi Kevin i have doubt what is the difference with the codes as the output im getting is not consistent

eigenvalues3  <-data.frame(sort(abs(m_pca$rotation[,"PC1"]), decreasing=TRUE)[1:500]) this is what you did here

this is what doing

Loadings <- as.data.frame(m_pca$rotation[,1:3]) taking first three

then

t <- Loadings[order(Loadings$PC1,decreasing = TRUE)[1:500],]

then this

hm = cbind(gene = rownames(t), t)
head(hm)
hmm = melt(hm, id = c("gene"))
head(hmm)
write_tsv(hm,"gene_hm_PC1.txt")

I should be getting same output in both the case...but im not not sure what am i doing wrong..

ADD REPLYlink written 24 months ago by krushnach80850

The code that I gave converts the loadings to absolute values with abs(); however, you do not appear to do that with your code (?)

ADD REPLYlink modified 23 months ago • written 24 months ago by Kevin Blighe66k

okay...so the only purpose is to get the absolute values ..but the gene would remain the same. isn't it?

ADD REPLYlink written 24 months ago by krushnach80850
1

To understand the difference between positive and negative loadings, you have to view the original PCA bi-plot (of samples). Positive values on PC1 may relate to group X, but negative values may relate to group Y.

Ordering by absolute values just says: 'this gene is important to either group X or group Y'

ADD REPLYlink modified 23 months ago • written 24 months ago by Kevin Blighe66k

okay that is important point...which i was missing ...i will do as you suggested

ADD REPLYlink written 24 months ago by krushnach80850

Hi Kevin,

I wonder which data should I upload for PCA, total matrix or just the matrix for differential expression genes?

If I upload total gene matrix, then when I want to find out the most contributing genes for PC1, should I exclude the undifferential expression genes?

Thanks in advance!

ADD REPLYlink written 5 months ago by Yi0

Upload to where?

ADD REPLYlink written 5 months ago by Kevin Blighe66k

I mean which data should be used for PCA? Just the DEGs or total genes? Thanks!

ADD REPLYlink written 5 months ago by Yi0
0
gravatar for The
5 months ago by
The160
United States
The160 wrote:

https://stats.stackexchange.com/questions/115032/how-to-find-which-variables-are-most-correlated-with-the-first-principal-compone

ADD COMMENTlink written 5 months ago by The160

Hey, I want to ask a follow up question. Is it possible to do the same for MDS? Multi-dimensional scaling? Thanks!

ADD REPLYlink written 4 months ago by junli19880
Please log in to add an answer.

Help
Access

Use of this site constitutes acceptance of our User Agreement and Privacy Policy.
Powered by Biostar version 2.3.0
Traffic: 1976 users visited in the last hour