Question

我有一个像这样的数据，想将它们合并成一行。当然，我可以进行for循环，但这并不优雅且效率很高。我当前的数据：

0.063456491   0.004457746    0.013450942     0.023948062     0.02247313
0.003147881  -0.018681539   -0.009495686    -0.008677241     0.013863377
0.083954841   0.100283809    0.061790913    -0.004592628    -0.052269582
-0.021375194  -0.041536406  -0.044538945     0.023639958     0.037451282

预期输出：

0.063456491 0.004457746 0.013450942 0.023948062 0.02247313  0.003147881 -0.018681539    -0.009495686    -0.008677241    0.013863377 0.083954841 0.100283809 …

非常感谢，丰

Answer 1

使用功能unlist将所有内容合并为一行

df <- data.frame(v1 = c(0.0000,0.1111,0.2222), v2 = c(1.11111,1.22222,1.33333))
 print(df)
      v1      v2
1 0.0000 1.11111
2 0.1111 1.22222
3 0.2222 1.33333
> df <- unlist (df, use.names = F)
> print(df)
 0.00000 0.11110 0.22220 1.11111 1.22222 1.33333

Answer 2

如果所有数据都是数字，并且您想按行提取它，那么可以

import firebase from "firebase/app";
import "firebase/firestore";
import "firebase/auth";

// Initialize Firebase
var config = {
    apiKey: process.env.REACT_APP_FIREBASE_API_KEY,
    authDomain: process.env.REACT_APP_FIREBASE_AUTH_DOMAIN,
    databaseURL: process.env.REACT_APP_FIREBASE_DATABASE_URL,
    projectId: process.env.REACT_APP_FIREBASE_PROJECT_ID,
    storageBucket: process.env.REACT_APP_FIREBASE_STORAGE_BUCKET,
    messagingSenderId: process.env.REACT_APP_FIREBASE_MESSAGING_SENDER_ID
};

firebase.initializeApp(config);
firebase.firestore();
console.log("firebase", firebase);

export default firebase;

或者更通用的data.frame(t(as.numeric(t(df)))) # X1 X2 X3 X4 X5 X6 ...... #1 0.06345649 0.004457746 0.01345094 0.02394806 0.02247313 0.003147881 ......方法也可以使用

as.vector

将多列的行合并为一个（行）R

2 个答案: