Commit 2be8c073 authored by Marie  BOURDON's avatar Marie BOURDON
Browse files

suppress data_raw folder

parent f47b81fb
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)
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment