Question

如果我有一个像这样的martix：

Name <- list("A","B","C", "D")

mat <- matrix(1:4, ncol = 4)
colnames(mat) <- Name
mat

产生：

     A B C D
[1,] 1 2 3 4

我有一个像这样的向量：

nameOrder <- c("B","D","A","C")

是否有一种方法可以对矩阵列进行重新排序，以使其顺序与向量nameOrder的顺序相匹配？也就是说，结果看起来像这样：

mat_1 <- reorder(mat columns to = nameOrder)
mat_1

    B D A C 
[1,]2 4 1 3

Answer 1

我们可以将'nameOrder'用作列名

<?php

// DB Query
$result=mysqli_query($dbcon,$consult); $i=0;

// Starting the table
print ("
<table>
    <tr>
        <th>NIF</th>
        <th>Name</th>
        <th>lastname</th> 
        <th>Edad</th>
    </tr>");

    // Result loop
    while($row=mysqli_fetch_row($result)){
        // Table content
        print ("
        <tr>
            <td>".$row[0]."</td>
            <td>".$row[1]."</td>
            <td>".$row[2]."</td>
            <td>".$row[3]."</td>
        </tr>");
    $i++;
    }

    // No results
    if ($i==0){
        print ("
        <tr>
            <td colspan='4'>No results</td>
        </tr>");
    }

// Closing table
print ("</table>");

?>

如何根据R中的向量对矩阵重新排序？

1 个答案: