帮我写一段R：将data1的列名导入到名为MSI数据框的行名，将cli1的stat列导入

您好，以下是您所需的R代码：

# 导入data1数据集和cli1数据集
data1 <- read.csv("data1.csv")
cli1 <- read.csv("cli1.csv")

# 将data1的列名导入到MSI数据框的行名
rownames(MSI) <- colnames(data1)

# 将cli1的stat列导入MSI数据框
MSI$stat <- cli1$stat

请注意，此代码假设您已经创建了一个名为MSI的空数据框，并且data1和cli1数据集中的列和行都对应。如果需要，您可能需要进行一些数据清理和转换。