find line of the regression model for GC-MS
findline(data, threshold = 2, temp = c(100, 320))
imported data matrix of GC-MS
the threshold of the response (log based 10)
the scale of the oven temperature (constant rate)
list linear regression model for the matrix
if (FALSE) {
data <- getmd(rawdata)
findline(data)
}