mydata<-read.table("C:/Users/user/Desktop/sb/data.txt",header=TRUE)
exponential.model <- lm(log(mydata[1])~mydata[2]+mydata[3]+mydata[4]+mydata[5]+mydata[6]+mydata[7]+mydata[8]+mydata[9]+mydata[10]+mydata[11]+mydata[12]+mydata[13]+mydata[14]+mydata[15]+mydata[16])
summary(exponential.model)
Error in model.frame.default(formula = log(mydata[1]) ~ mydata[2] + mydata[3] +  :
  参数'log(mydata[1])'的种类(list)不对

请教各位大神帮忙解答~