I need to approximate and build the data in the table(code below).
results <- read.table(file='results',header =TRUE)
out = nls(y ~(a*exp(b*x) - 1), data=results, start=list(a=0.081, b=20.89))
out <- summary(out)
I found the approximation using the function summary(), but I do not know how to build a table with approximation results? Please help me!!!!!