suppress data_raw folder

stuart/data_raw/annotation.R

-library(dplyr)
-library(tidyr)
-
-# creation of annotation files
-
-###################################
-# miniMUGA
-###################################
-annot_mini <- read.csv(file = "data_raw/mini_uwisc_v2.csv")
-
-annot_mini <- annot_mini %>% mutate_all(as.character)
-annot_mini <- annot_mini %>% select(-c(strand,probe,chr_unc,bp_unc))
-
-#create data
-usethis::use_data(annot_mini, overwrite = TRUE)
-
-###################################
-# MUGA
-###################################
-annot_muga <- read.csv(file = "data_raw/muga_uwisc_v1.csv")
-
-annot_muga <- annot_muga %>% mutate_all(as.character)
-annot_muga <- annot_muga %>% select(-c(strand,probe,chr_unc,bp_unc))
-
-# create data
-usethis::use_data(annot_muga, overwrite = TRUE)
-
-###################################
-# megaMUGA
-###################################
-annot_mega <- read.csv(file = "data_raw/mm_uwisc_v1.csv")
-
-annot_mega <- annot_mega %>% mutate_all(as.character)
-annot_mega <- annot_mega %>% select(-c(strand,multi,n_blast_hits,n_blast_chr,probe))
-
-# create data
-usethis::use_data(annot_mega, overwrite = TRUE)
-
-###################################
-# gigaMUGA
-###################################
-annot_giga <- read.csv(file = "data_raw/gm_uwisc_v1.csv")
-
-annot_giga <- annot_giga %>% mutate_all(as.character)
-annot_giga <- annot_giga %>% select(-c(strand,multi,n_blast_hits,n_blast_chr,probe))
-
-# create data
-usethis::use_data(annot_giga, overwrite = TRUE)
-