if(!require(readr)) install.packages("readr")
library(readr) 

github="https://raw.githubusercontent.com/agronomy4future/raw_data_practice/refs/heads/main/fertilizer_treatment.csv" 

dataA=data.frame(read_csv(url(github), show_col_types=FALSE))
print(head(dataA, 5))

  Genotype   Block  variable value
1 Genotype_A     I  Control  42.9
2 Genotype_A    II  Control  41.6
3 Genotype_A   III  Control  28.9
4 Genotype_A    IV  Control  30.8
5 Genotype_B     I  Control  53.3
.
.
.

write.csv (dataA, file="dataA.csv", row.names= FALSE)