regression in R, seminar on ddply