Перетворити рядок кадру даних у вектор

Я хочу створити вектор із ряду кадрів даних. Але я не хочу мати рядки та назви стовпців. Я спробував кілька речей ... але не пощастило.

Це мій кадр даних:

> 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

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