# HG changeset patch
# User proteomisc
# Date 1701620051 0
# Node ID 4b3faf457c37d2467dc634a7c4a9db612ea9bad4
# Parent  0d544d449cca6eb54b5b52d4aff048f4fd23ac7d
Uploaded

diff -r 0d544d449cca -r 4b3faf457c37 preprocess_datasets/Affymetrix_Preprocessing_Functions.R
--- a/preprocess_datasets/Affymetrix_Preprocessing_Functions.R	Sun Dec 03 16:13:53 2023 +0000
+++ b/preprocess_datasets/Affymetrix_Preprocessing_Functions.R	Sun Dec 03 16:14:11 2023 +0000
@@ -22,7 +22,8 @@
   installed<-as.data.frame(installed.packages())
   lbraries=paste(annotation(data.sm),"db",sep='.')
   if(!lbraries%in%installed$Package){
-  biocLite(lbraries[!lbraries%in%installed$Package])}
+  suppressWarnings(suppressMessages(require("BiocManager", quietly = TRUE)))
+  BiocManager::install(lbraries[!lbraries%in%installed$Package])}
   
   suppressWarnings(suppressMessages(library(lbraries,character.only = TRUE)))