问创建一个函数，将数据帧的所有列作为r中的输入。

EN

我有两个数据框架：“临床”和表达式“”

“临床”数据包含关于乳腺癌(rows)患者各种临床参数(列)的数据。“表达”包含关于乳腺癌(rows)患者表达基因水平(列)的数据。“表达式”dataframe中的列名是各种"gene.ID"。

这两个数据文件都有相同的病人(行)，并且仅在列中彼此不同。但是，每个dataframe中的行与其他dataframe的顺序并不完全相同。

我想测试和标出某一基因表达水平与队列中个体临床参数之间的相关性。

为了做到这一点，我试图创建一个函数：(1)接收这些数据和特定基因的gene.ID；(2)提取该基因的表达模式；(3)从两个数据中匹配患者；(4)检查所有的临床参数；(5)每次对另一个临床参数进行计算。

我的主要问题是“检查所有的临床参数”部分，虽然我非常肯定我的其余代码并不是更好。

到目前为止，我的代码如下所示：

my_function <- function(clinical_data, expression_data, gene.ID){
  gene.ID <- (expression_data$gene.ID)      
  expression.pattern <- as.numeric(expression$gene.ID)
  matched.samples <- match(row.names(clinical), row.names(expression))
  for(i in names(clinical)){
  ***here will come an if statement***

我也认为我对"gene.ID“有一个严重的问题。

我想知道我的函数应该改变什么，这样一旦我写了if语句，它就能完成这项工作。

我希望我的问题足够清楚。