计算样本中位数，并导出结果至excel中，R语言代码

假设样本数据存储在向量`data`中，可以使用以下R语言代码计算样本中位数并将结果导出到Excel中：

# 导入必要的库
library(xlsx)

# 计算中位数
median_value <- median(data)

# 将中位数导出到Excel
write.xlsx(median_value, file = "median.xlsx", sheetName = "Sheet1", row.names = FALSE, col.names = FALSE)

其中，`xlsx`库提供了用于读写Excel文件的函数。`write.xlsx()`函数将中位数`median_value`导出到名为`median.xlsx`的Excel文件中的`Sheet1`工作表，并且不包含行名和列名。

相关问题

median_T <- data %>% group_by(sample) %>% summarize(median_expression = median(expression))，计算样本中位数，并导出结果至excel中，R语言代码

假设你的样本数据存储在一个名为`data`的数据框中，其中包含两列，一列为样本名称`sample`，另一列为表达量`expression`，可以使用以下R语言代码计算每个样本的中位数，并将结果导出到Excel中：

# 导入必要的库
library(dplyr)
library(xlsx)

# 计算中位数
median_T <- data %>% 
  group_by(sample) %>% 
  summarize(median_expression = median(expression))

# 将中位数导出到Excel
write.xlsx(median_T, file = "median_T.xlsx", sheetName = "Sheet1", row.names = FALSE, col.names = TRUE)

其中，使用`dplyr`库中的`group_by()`函数按照样本名称进行分组，再使用`summarize()`函数计算每个样本的中位数。最后，使用`write.xlsx()`函数将中位数数据框`median_T`导出到名为`median_T.xlsx`的Excel文件中的`Sheet1`工作表，并且包含列名。