Using r
Random text
dat3 <- read.csv('https://raw.githubusercontent.com/tmatis12/datafiles/main/diameter.csv')