Я задаю вопрос к аналогичному сообщению, опубликованному 2 года назад, без полного ответа на него ( подмножество объекта prcomp в R ). Постскриптум извините за комментарий для ответа ..
По сути, мой вопрос такой же. Я сгенерировал таблицу PCA, используя prcomp с 10000+ генами и 1700+ клетками, состоящими из 7 временных точек. Построение их всех в одном файле затрудняет просмотр.
Я хотел бы построить каждый момент времени отдельно, используя одну и ту же таблицу результатов PCA (т.е. без повторного запуска prcomp).
Спасибо, Дин, за то, что дал мне советы по публикации. Чтобы придумать, как описать мой набор данных, не загружая его здесь, мне понадобится неделя. Я также попробовал
dput(droplevels(head(object,2)))
, но это было слишком много информации, так как у меня такой большой набор данных. Короче говоря, это большая матрица набора данных из одной ячейки, где люди обычно могут видеть такие пакеты, как Seurat (https://satijalab.org/seurat/pbmc3k_tutorial_1_4.html). РЕДАКТИРОВАТЬ: я разместил здесь скриншот подмножества моей матрицы ().
Извините, я не знаю, как воссоздать это или даже экспортировать текстовый формат ... Но вот что я могу предоставить:
Моя матрица TPM содержит 16541 ряд (определяющих гены) и 1798 столбцов (определяющих ячейки).
В нем я «переименовал» свои столбцы на основе временных точек, используя такие коды, как:
D0<-c(colnames(TPM[,grep("20180419-24837-1-*", colnames(TPM))])) #D0: 286 cells
D7<-c(colnames(TPM[,grep("20180419-24837-2-*", colnames(TPM))])) #D7: 237 cells
D10<-c(colnames(TPM[,grep("20180419-24947-5-*", colnames(TPM))])) #D10: 304 cells
...... и я продолжал маркировать каждый момент времени.
Каждому моменту времени также был придан определенный цвет.
rc<-rep("white", ncol(TPM))
rc<-[,grep("20180419-24837-1-*", colnames(TPM))]= "magenta"
...... и я продолжал придавать цвет каждому моменту времени.
Я выполнил PCA, используя этот код:
pcaRes<-prcomp(t(log(TPM+1)), center= TRUE, scale. = TRUE)
Затем я приступил к построению графика PCA, используя:
plot(pcaRes$x[,1], pcaRes$x[,2], xlab="PC1", ylab="PC2",
cex=1.0, col= rc, pch=16, main="")
Тогда я, когда хотел построить график PCA только с D0, используя тот же выход PCA (pcaRes). Вот где я застрял.
P.S. Если у кого-то есть более простой способ посоветовать, как ввести пример данных из моей большой матрицы, я буду рад любой помощи. Спасибо! Извините, я очень новичок в биоинформатике.