i have done a bachelor of science in statistics.have enough knowledge in data analysis using R.I took regression modelling using R.Some examples of the codes i did are;Age<-c(18,23,25,35,65,54,34,56,72,19,23,42,18,39,37)
maxrate<-c(202,186,187,180,156,169,174,172,153,199,193,174,198,183,178)
plot(Age,maxrate)
p<-lm(maxrate~Age)
abline(p)
coef(p)
t.test(maxrate,Age,alternative="two.sided",mu=-1)
ei<-resid(p)
ei
n<-length(Age)
n
s<-sqrt(sum(ei^2)/(n-2))
s
se<-s/sqrt(sum((Age-mean(Age))^2))
se
B1<-((coef(p))[['Age']])
B1
t=B1/se
t
#p value
pt(t,n-2,lower.tail=T)