R创建一个函数，对数据集的几行进行绘图和回归

我是编程/R新手，我有一个问题可能很简单

我的职能是：

par(mfrow=c(2,2))    
plot_QQ=function(x) {for(i in 2:x)
     plot(c(data_raw[,Group1[i]]),c(data_raw[,Group1[1]]), xlab=paste("replicate",i), ylab="replicate 1")
           abline(lm(c(data_raw[,Group1[i]])c(data_raw[,Group1[1]]))}

group1是一个向量c（“，”，“），用于绘制特定于数据的图形。此函数正在工作，但R不会在所有绘图中绘制abline（）。（仅在“最后”图c（data_raw[，Group1[i=x]]）、c（data_raw[，Group1[1]]）中绘制了线

很抱歉提出这么简单的问题，谢谢您的帮助

---

greetz

将来，您应该提供一些模拟数据，以便人们可以运行您的代码，不清楚您到底在尝试做什么。您不需要c（）函数，并且您的lm调用不正确。此外，您的for循环周围没有花括号。试试这个

par(mfrow=c(2,2))    
    plot_QQ=function(x) {for(i in 2:x){
    plot(data_raw[,Group1[i]],data_raw[,Group1[1]], xlab=paste("replicate",i), ylab="replicate 1")
    abline(lm(data_raw[,Group1[i]]~data_raw[,Group1[1]])}}