changeset 3:203c72c1c2ea draft

Uploaded
author jfb
date Mon, 14 Jan 2019 13:55:15 -0500
parents 31f6858163bd
children 76f8ac0fe858
files KT-ID fisher test/7-7-fisher-galaxy_working.R
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/KT-ID fisher test/7-7-fisher-galaxy_working.R	Mon Jan 14 13:33:18 2019 -0500
+++ b/KT-ID fisher test/7-7-fisher-galaxy_working.R	Mon Jan 14 13:55:15 2019 -0500
@@ -3,8 +3,9 @@
 
 PositiveSubstrateList<- read.csv("substrates.csv", stringsAsFactors=FALSE)
 NegativeSubstrateList<- read.csv("negatives.csv", stringsAsFactors=FALSE)
-SubstrateBackgroundFrequency<- read.csv("SBF.csv", stringsAsFactors=FALSE)
+SubstrateBackgroundFrequency<- read.csv("SBF.csv", stringsAsFactors=FALSE,header = FALSE)
 SubstrateBackgroundFrequency<-t(SubstrateBackgroundFrequency)
+SubstrateBackgroundFrequency<-SubstrateBackgroundFrequency[2:nrow(SubstrateBackgroundFrequency),]
 
 ScreenerFilename<-"screener"
 screaner<-read.csv(ScreenerFilename, header = FALSE, stringsAsFactors = FALSE)