Veri çerçevesinin bir satırını vektöre dönüştürme

Bir veri çerçevesinin bir satırından bir vektör oluşturmak istiyorum. Ancak satır ve sütun adlarına sahip olmak istemiyorum. Birkaç şey denedim ... ama şansım olmadı.

Bu benim veri çerçevem:

> df <- data.frame(a=c(1,2,4,2),b=c(2,6,2,1),c=c(2.6,8.2,7.5,3))
> df
  a b   c
1 1 2 2.6
2 2 6 8.2
3 4 2 7.5
4 2 1 3.0

Denedim:

> newV <- as.vector(df[1,])
> newV
  a b   c
1 1 2 2.6

Ama gerçekten böyle bir şey istiyorum:

> newV <- c( 1,2,2.6)
> newV
[1] 1.0 2.0 2.6

Bir veri çerçevesinden tek bir satır çıkardığınızda, tek satırlık bir veri çerçevesi elde edersiniz. Sayısal bir vektöre dönüştürün:

as.numeric(df[1,])

@Roland'ın önerdiği gibi, unlist(df[1,])tek satırlı veri çerçevesini isimleri düşürmeden sayısal bir vektöre dönüştürecektir. Bu nedenle unname(unlist(df[1,])), aynı sonuca ulaşmanın başka, biraz daha açık bir yoludur.

Aşağıda @ Josh'un yorumladığı gibi, tamamen sayısal olmayan (alfabetik, faktör, karma ...) bir veri çerçeveniz varsa, as.character(df[1,])bunun yerine ihtiyacınız var .

unlistİsimleri koruyan tavsiye ederim .

unlist(df[1,])
  a   b   c 
1.0 2.0 2.6 

is.vector(unlist(df[1,]))
[1] TRUE

Adlandırılmış bir vektör istemiyorsanız:

unname(unlist(df[1,]))
[1] 1.0 2.0 2.6

Sayısal olarak değiştirmek istemiyorsanız, bunu deneyebilirsiniz.

> as.vector(t(df)[,1])
[1] 1.0 2.0 2.6

İşte dplyrtemelli bir seçenek:

newV = df %>% slice(1) %>% unlist(use.names = FALSE)

# or slightly different:
newV = df %>% slice(1) %>% unlist() %>% unname()

Sıranız bir faktör içeriyorsa dikkatli olmanız gerektiğini unutmayın. İşte bir örnek:

df_1 = data.frame(V1 = factor(11:15),
                  V2 = 21:25)
df_1[1,] %>% as.numeric() # you expect 11 21 but it returns 
[1] 1 21

İşte başka bir örnek (varsayılan olarak data.frame () karakterleri faktörlere dönüştürür)

df_2 = data.frame(V1 = letters[1:5],
                  V2 = 1:5)
df_2[3,] %>% as.numeric() # you expect to obtain c 3 but it returns
[1] 3 3
df_2[3,] %>% as.character() # this won't work neither
[1] "3" "3"

Bu davranışı önlemek için, çıkarmadan önce faktöre dikkat etmeniz gerekir:

df_1$V1 = df_1$V1 %>% as.character() %>% as.numeric()
df_2$V1 = df_2$V1 %>% as.character()
df_1[1,] %>% as.numeric()
[1] 11  21
df_2[3,] %>% as.character()
[1] "c" "3"

Veri çerçevelerinin sütunları zaten vektörlerdir, sadece onları çıkarmanız gerekir. İstediğiniz sütunu virgülden önce değil, sonra koyduğunuzu unutmayın:

> newV <- df[,1]
> newV
[1] 1 2 4 2

Gerçekten bir kavga istiyorsanız, Ben'in dediğini yapın ve lütfen ileride kelimeleri doğru şekilde kullanın.