Shortening the formula syntax of a regression model in R

Question

I was wondering if the model syntax of the regression model below could be made more concise (shorter) than what it currently is?

dat <- read.csv(\'https://raw