Beginner R question about linear model summaries

Question

library(alr4)
data(Transact)
M1 <- lm(time ~ t1 + t2, Transact)
Summary(M1)

unfortunately as a beginner I get this result:

Error in (function