Skip to content

Instantly share code, notes, and snippets.

@IsmailM
Created April 4, 2016 16:33
Show Gist options
  • Save IsmailM/d2ea0a33d06edadd2efc8d86d81190c6 to your computer and use it in GitHub Desktop.
Save IsmailM/d2ea0a33d06edadd2efc8d86d81190c6 to your computer and use it in GitHub Desktop.
suppressMessages(library("GEOquery"))
gse <- getGEO('GDS6', GSEMatrix = TRUE)
eset <- GDS2eSet(gse, do.log2 = FALSE)
X <- exprs(eset) # Get Expression Data
X <- X[rowSums(is.na(X)) != ncol(X),] # remove rows with missing data
knnImputation(X, scale=F)
install.packages('imputation')
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment