Introduction

This report relates to the diameters of 100 randomly sampled parts.

Code & Output

url <- "https://raw.githubusercontent.com/tmatis12/datafiles/main/diameter.csv"
diameter <- read.csv(url)

diameter_log <- log(diameter)

head(diameter_log)
##   Diameter
## 1 2.328350
## 2 2.305680
## 3 2.322682
## 4 2.326790
## 5 2.340748
## 6 2.282688