diff --git a/_posts/2023-12-13-class-11-programming-pt-1/download-files.R b/_posts/2023-12-13-class-11-programming-pt-1/download-files.R index 671d263..341b936 100644 --- a/_posts/2023-12-13-class-11-programming-pt-1/download-files.R +++ b/_posts/2023-12-13-class-11-programming-pt-1/download-files.R @@ -2,8 +2,8 @@ data_dir <- "data" dir.create(data_dir, showWarnings = FALSE) files_to_dl <- list( - "brauer_gene_exp.csv.gz" = "https://github.com/rnabioco/bmsc-7810-pbda/raw/main/data/class10/brauer_gene_exp.csv.gz", - "yeast_prot_prop.csv.gz" = "https://github.com/rnabioco/bmsc-7810-pbda/raw/main/data/class10/yeast_prot_prop.csv.gz" + "brauer_gene_exp.csv.gz" = "https://github.com/rnabioco/bmsc-7810-pbda/raw/main/data/class11/brauer_gene_exp.csv.gz", + "yeast_prot_prop.csv.gz" = "https://github.com/rnabioco/bmsc-7810-pbda/raw/main/data/class11/yeast_prot_prop.csv.gz" ) missing_files <- files_to_dl[!file.exists(file.path(data_dir, names(files_to_dl)))] diff --git a/_posts/2023-12-13-class-11-programming-pt-1/programming-pt1.Rmd b/_posts/2023-12-13-class-11-programming-pt-1/programming-pt1.Rmd index 4156461..205febb 100644 --- a/_posts/2023-12-13-class-11-programming-pt-1/programming-pt1.Rmd +++ b/_posts/2023-12-13-class-11-programming-pt-1/programming-pt1.Rmd @@ -23,7 +23,7 @@ library(tidyverse) ```{r} # Conditionally download files from github -source("https://raw.githubusercontent.com/rnabioco/bmsc-7810-pbda/main/_posts/2023-12-13-class-11-programming-pt-1/download_files.R") +source("https://raw.githubusercontent.com/rnabioco/bmsc-7810-pbda/main/_posts/2023-12-13-class-11-programming-pt-1/download-files.R") ```