在R语言中，数据转置可以通过多种方法实现，具体方法取决于数据的类型和需求。以下是常见的转置方法及适用场景：

一、数据框（DataFrame）转置

使用`t（）`函数

对于数据框的行转置（即列交换），直接使用`t（）`函数即可。注意，`t（）`会自动为转置后的数据框添加新的行名（如原列名）。

```r

示例数据框

df <- data.frame(A = c(1, 2, 3), B = c(4, 5, 6), C = c(7, 8, 9))

转置后

transposed_df <- t(df)

```

使用`gather`函数（tidyr包）

若需将宽格式数据转为长格式（如将多列转为单列），可使用`gather`函数。

```r

library(tidyr)

data <- data.frame(a = c(1, 2), b = c(3, 4))

transposed_data_long <- gather(data, key = "variable", value = "value")

```

使用`pivot_longer`和`pivot_wider`函数

- `pivot_longer`将宽格式转为长格式，适用于列数较多的数据。

- `pivot_wider`则相反，将长格式转为宽格式。

```r

转置为长格式

transposed_data_long <- pivot_longer(data, cols = starts_with("pre_"), names_to = "variable", values_to = "value")

转置为宽格式

transposed_data_wide <- pivot_wider(data, names_from = "variable", values_from = "value")

```

二、矩阵转置

对于矩阵（二维数组）的转置，使用`transpose（）`函数或`t（）`函数均可。

```r

创建矩阵

mat <- matrix(1:12, nrow = 3, ncol = 4)

转置矩阵

transposed_mat <- transpose(mat)

或使用t()函数

transposed_mat_t <- t(mat)

```

三、注意事项

转置后表头问题

使用`t（）`函数转置数据框时，原行名可能成为新列名。若需保留原列名，可结合`colnames（）`重新命名。

```r

transposed_df <- t(df)

colnames(transposed_df) <- rownames(df)

```

数据类型转换

转置后数据类型可能发生变化（如因子与数值型互换），需根据需求进行类型转换。

四、示例对比

| 原始数据框 | 转置后数据框（t（）） | 转置后数据框（gather） |

|------------|------------------|--------------------------|

| A B C | C B A | key=value |

| pre_prosocial post_prosocial | value variable| variable value |

通过以上方法，可灵活实现R语言中数据框、矩阵等不同类型数据的转置需求。