Преобразование строки фрейма данных в вектор

Я хочу создать вектор из строки фрейма данных. Но мне не нужны имена строк и столбцов. Я пробовал несколько вещей ... но безуспешно.

Это мой фрейм данных:

> 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

Я попытался:

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

Но мне очень нужно что-то вроде этого:

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

Когда вы извлекаете одну строку из фрейма данных, вы получаете однорядный фрейм данных. Преобразуйте его в числовой вектор:

as.numeric(df[1,])

Как предлагает @Roland, unlist(df[1,])преобразует однострочный фрейм данных в числовой вектор, не удаляя имена. Следовательно, unname(unlist(df[1,]))это еще один, немного более явный способ получить тот же результат.

Как комментирует @Josh ниже, если у вас есть не полностью числовой (буквенный, факторный, смешанный ...) фрейм данных, вам нужен as.character(df[1,])вместо этого.

Рекомендую unlist, что сохраняет имена.

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

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

Если вам не нужен именованный вектор:

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

Если вы не хотите переходить на числовой, вы можете попробовать это.

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

Вот dplyrвариант на основе:

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

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

Обратите внимание, что вы должны быть осторожны, если ваша строка содержит фактор. Вот пример:

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

Вот еще один пример (по умолчанию data.frame () преобразует символы в множители)

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"

Чтобы предотвратить такое поведение, вам нужно позаботиться о факторе перед его извлечением:

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"

Столбцы фреймов данных уже являются векторами, их нужно просто вытащить. Обратите внимание, что вы помещаете нужный столбец после запятой, а не перед ней:

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

Если вам действительно нужна строка, то делайте то, что сказал Бен, и, пожалуйста, используйте слова правильно в будущем.