What package in R is used to calculate non-zero null hypothesis p-values on linear models?

Question

The standard summary(lm(Height~Weight)) will output results for the hypothesis test H0: Beta1=0, but if I am interested in testing the hypothesis H0: B1=1 is th