Chuyển đổi một danh sách để một hàng data.frame

Question

tôi có một danh sách như thế này:

arg0 <- list(code = "a", n = rep(10, 3)) 

Số lượng các đối tượng trong danh sách có thể thay đổi. Các đối tượng của danh sách là các vectơ - chỉ các đối tượng một chiều.

Tôi muốn thực hiện một thủ tục để chuyển đổi danh sách để một data.frame một dòng như thế này:

> data.frame(code = "a", n.1 = 10, n.2 = 10, n.3 = 10) 
    code n.1 n.2 n.3 
1 a 10 10 10 

tôi có hiện giải pháp này:

a <- stack(arg0) 
b <- data.frame(t(a[,1])) 
names(b) <- a[,2] 
b <- data.frame(b) 

đâu b hầu như kết quả Tôi muốn đạt được:

> b 
    code n n.1 n.2 
1 a 10 10 10 

Hai câu hỏi:

1. Có cách nào thanh lịch hơn để đạt được kết quả không?
2. Bạn có biết cách đánh số các tên trùng lặp giống như c(n.1, n.2, n.3) không?

Answer 1

Nếu bạn muốn giữ lại các kiểu dữ liệu khác nhau của các đối tượng của danh sách, lệnh sau đây có thể được sử dụng:

data.frame(lapply(arg0, function(x) t(data.frame(x)))) 

Sản lượng:

code n.1 n.2 n.3 
x a 10 10 10 

Giá trị i n cột hai đến bốn vẫn là số.

Answer 2

Bạn có thể sử dụng kết hợp write.table và read.table trên dữ liệu không công khai được chuyển đổi. Tôi đã sử dụng khay nhớ tạm làm bước trung gian để giữ bảng.

write.table(t(unlist(arg0)),"clipboard") 
read.table("clipboard") 
    code n1 n2 n3 
1 a 10 10 10 

Answer 3

Đây là một cách:

data.frame(t(unlist(arg0))) 
# code n1 n2 n3 
# 1 a 10 10 10