Don't use this code yet

Still checking some stuff

Don't use this code yet
Still checking some stuff
Efrain Gonzalez
1 parent 66494e5dc5
Showing 1 changed file with 1 additions and 1 deletions Show diff stats
RAutoClDs.R
@@ -104,7 +104,7 @@ NAFIXING &lt;- function(GIDNAM){
 }	
  
 #4#Function for changing the gene ID to gene name
-cgeneID2 <- function(GeneName,DATA){
+cgeneID <- function(GeneName,DATA){
 	nj <- t(GeneName)
 	nq <- t(DATA)
 	colGene <- dim(nj)[2]
...	...	@@ -104,7 +104,7 @@ NAFIXING <- function(GIDNAM){
104	104	}
105	105
106	106	#4#Function for changing the gene ID to gene name
107		-cgeneID2 <- function(GeneName,DATA){
	107	+cgeneID <- function(GeneName,DATA){
108	108	nj <- t(GeneName)
109	109	nq <- t(DATA)
110	110	colGene <- dim(nj)[2]