轉換/結合2欄數據幀到1列dataframe-ř

Question

下面示出了X的腳本，被存儲在一個兩列data.frame

a1 <- as.character(c(3456,2569)) 
a2 <- as.character(c(956,569)) 
a3 <- as.character(c(156,269)) 
mydf <- rbind(a1, a2, a3) 

如何可以存儲它在一個data.frame Y數據其中一列的格式爲「X，Y」，併爲每個X和Y（字符）添加零。

所以輸出將

"3456.000, 2569.000" 
"956.000, 569.000" 
"156.000, 269.000" 

Answer 1

像這樣的東西可以工作：根據您的矩陣的行

data.frame(col1 = apply(mydf, 1, function(x) paste(paste0(x, '.000'), collapse = ', '))) 
#     col1 
#a1 3456.000, 2569.000 
#a2 956.000, 569.000 
#a3 156.000, 269.000 

apply迭代，並且首先創建一個與零（這是paste0），然後數將所有內容合併成一個逗號分隔的字符串（即paste）。

Answer 2

是否所有的整數數量，或做一些他們已經有一個小數點？如果是後者，你可能想要做這樣的事情

sprintf("%.3f, %.3f", as.numeric(mydf[,1]), as.numeric(mydf[,2]))