2017-09-24 3 views
0

데이터 행 cul7_expr이 하나의 행과 22 개의 열로 구성되어 있습니다. cul7_expr의 모든 숫자 값과 모든 열 이름 (TCGA.BC ...)이있는 다른 열이 포함 된 하나의 열을 포함하는 새 데이터 프레임을 만들고 싶습니다. 새 데이터 프레임은 2 열 22 행을 갖습니다. 그러나 cul7_expr 행을 가져 오려고하면 경고가 나타나고 데이터 프레임이 비어 있습니다.데이터 프레임 행을 새 데이터 프레임 열로 변환합니다. R

샘플 데이터 (cul7_expr는)

df <- structure(list(TCGA.BC.A10Q.11A=819.3685,TCGA.BC.A10Q.01A=2757.486, 
TCGA.DD.A1EB.11A=698.5818,TCGA.DD.A1EB.01A=1625.094,TCGA.DD.A1EG.11A=409.9332, 
TCGA.DD.A1EG.01A=2221.012,TCGA.DD.A1EH.11A=391.0916,TCGA.DD.A1EH.01A=2122.782, 
TCGA.DD.A1EI.11A=717.2073,TCGA.DD.A1EI.01A=768.7468,TCGA.DD.A3A6.11A=464.6395, 
TCGA.DD.A3A6.01A=1175.928,TCGA.DD.A3A8.11A=934.9738,TCGA.DD.A3A8.01A=931.8955, 
TCGA.ES.A2HT.11A=599.736,TCGA.ES.A2HT.01A=894.8324,TCGA.FV.A23B.11A=970.1805, 
TCGA.FV.A23B.01A=3018.075,TCGA.FV.A3I0.11A=337.222,TCGA.FV.A3I0.01A=3895.477, 
TCGA.FV.A3R2.11A=912.8499,TCGA.FV.A3R2.01A=2226.921), 
.Names=c("TCGA.BC.A10Q.11A","TCGA.BC.A10Q.01A","TCGA.DD.A1EB.11A", 
"TCGA.DD.A1EB.01A","TCGA.DD.A1EG.11A","TCGA.DD.A1EG.01A","TCGA.DD.A1EH.11A", 
"TCGA.DD.A1EH.01A","TCGA.DD.A1EI.11A","TCGA.DD.A1EI.01A","TCGA.DD.A3A6.11A", 
"TCGA.DD.A3A6.01A","TCGA.DD.A3A8.11A","TCGA.DD.A3A8.01A","TCGA.ES.A2HT.11A", 
"TCGA.ES.A2HT.01A","TCGA.FV.A23B.11A","TCGA.FV.A23B.01A","TCGA.FV.A3I0.11A", 
"TCGA.FV.A3I0.01A","TCGA.FV.A3R2.11A","TCGA.FV.A3R2.01A"),row.names = c(NA, -1L), 
class = c("data.table","data.frame")) 
+0

"행을 가져 가려고합니까?" – Elin

+0

@Elin 기본적으로 모든 숫자 인 cul7_expr 1 행을 변환하려고 시도하고이를 새 데이터 프레임의 열로 만듭니다. – merryberry

+0

그런 행을 어떻게 변환하려고합니까? 몇 가지 코드를 보여주십시오. 이와 같이 당신이 의미하는 바를 알아내는 것은 어렵고 문제가 어디에 있는지 알 수 없습니다. –

답변

1

함수 용융보십시오. 장래에이를 돕기 위해 데이터를 와이드 포맷에서 장 포맷으로 변경한다고합니다.

require(data.table) 
melt(df,measure.vars=1:22) 

출력 : 난 당신이 당신이 트랜스와 열 이름을 얻을하고 그들로부터 데이터 프레임을 만들 필요가 정확하게 원하는 것을 이해한다면

  variable  value 
1: TCGA.BC.A10Q.11A 819.3685 
2: TCGA.BC.A10Q.01A 2757.4860 
3: TCGA.DD.A1EB.11A 698.5818 
4: TCGA.DD.A1EB.01A 1625.0940 
5: TCGA.DD.A1EG.11A 409.9332 
6: TCGA.DD.A1EG.01A 2221.0120 
7: TCGA.DD.A1EH.11A 391.0916 
8: TCGA.DD.A1EH.01A 2122.7820 
9: TCGA.DD.A1EI.11A 717.2073 
10: TCGA.DD.A1EI.01A 768.7468 
11: TCGA.DD.A3A6.11A 464.6395 
12: TCGA.DD.A3A6.01A 1175.9280 
13: TCGA.DD.A3A8.11A 934.9738 
14: TCGA.DD.A3A8.01A 931.8955 
15: TCGA.ES.A2HT.11A 599.7360 
16: TCGA.ES.A2HT.01A 894.8324 
17: TCGA.FV.A23B.11A 970.1805 
18: TCGA.FV.A23B.01A 3018.0750 
19: TCGA.FV.A3I0.11A 337.2220 
20: TCGA.FV.A3I0.01A 3895.4770 
21: TCGA.FV.A3R2.11A 912.8499 
22: TCGA.FV.A3R2.01A 2226.9210 
+0

용융은 기본 기능이 아니므로 논의 할 용철의 특정 버전을 포함시켜야합니다. – Elin

+0

@Elin - 감사합니다. 패키지 참조를 추가했습니다. – www

0

.

# set up data 
x <- data.frame(1, 2, 3, 4) 
names <- c("A", "B", "C", "D") 
colnames(x) <- names 

#convert 
names <- colnames(x) 
data.frame(t(x), names)