Mam nazwany wektor znaków zwrócony z xmlAttrs w następujący sposób:
testVect <- structure(c("11.2.0.3.0", "12.89", "12.71"), .Names = c("db_version",
"elapsed_time", "cpu_time"))
Chciałbym przekonwertować go na ramkę danych, która wygląda następująco:
testDF <- data.frame("db_version"="11.2.0.3.0","elapsed_time"=12.89,"cpu_time"=12.71)
head(testDF)
db_version elapsed_time cpu_time
1 11.2.0.3.0 12.89 12.71
r
dataframe
vector
type-conversion
Tyler Muth
źródło
źródło
data_frame(as.list(testVect))zwróć 5-wierszową ramkę danych.as_tibble(as.list(testVect))lubas_data_frame(as.list(testVect))(as_data_framejest aliasem dlaas_tibble).data.table(as.list(...))nie działa, ale zamiast tegoas.data.table(as.list(...))działa.Odpowiedzi z @MatthewPlourde i @JackRyan działają, ale jeśli masz długi nazwany wektor, denerwujące jest posiadanie ramki danych z jednym wierszem i wieloma kolumnami. Jeśli wolisz mieć kolumnę „klucz” i kolumnę „wartość” z wieloma wierszami, powinno działać dowolne z poniższych:
data.frame(keyName=names(testVect), value=testVect, row.names=NULL) ## keyName value ## 1 db_version 11.2.0.3.0 ## 2 elapsed_time 12.89 ## 3 cpu_time 12.71 ## Suggested by @JWilliman tibble::enframe(testVect) ## # A tibble: 3 x 2 ## name value ## <chr> <chr> ## 1 db_version 11.2.0.3.0 ## 2 elapsed_time 12.89 ## 3 cpu_time 12.71 ## Suggested by @Joe stack(testVect) ## values ind ## 1 11.2.0.3.0 db_version ## 2 12.89 elapsed_time ## 3 12.71 cpu_timeźródło
tibble::enframe(testVect).stack(testVect)robi to również, ale pozostawia wartości jako znaki.testVect %>% as.list %>% as.data.frame %>% tidyr::gather()To faktycznie tworzy kolumny „klucz” i „wartość”, do których odnosił się @dnlbrky.stack()co za niedoceniana funkcja!Mam zamiar zadać sobie pytanie:
źródło
data.frame(t(testVect))Ja używałem funkcji sugerowanych w tych odpowiedziach (
as.list,as_tibble,t,enframe, itd.), Ale od tego czasu okazało się, żedplyr::bind_rowspracuje teraz zrobić dokładnie to, co oryginalne pytanie zadaje za pomocą jednego wywołania funkcji.library(dplyr) testVect <- structure(c("11.2.0.3.0", "12.89", "12.71"), .Names = c("db_version", "elapsed_time", "cpu_time")) testVect %>% bind_rows #> # A tibble: 1 x 3 #> db_version elapsed_time cpu_time #> <chr> <chr> <chr> #> 1 11.2.0.3.0 12.89 12.71Utworzono 10.11.2019 przez pakiet reprex (v0.3.0)
Jak pokazano na tidyverse - preferowany sposób przekształcenia nazwanego wektora w data.frame / tibble
źródło
named vector %>% as_tibble(.,rownames="column name of row.names")źródło