| Previous changeset 4:76f8ac0fe858 (2019-01-14) Next changeset 6:eb89ff215fb8 (2020-02-05) |
|
Commit message:
Uploaded |
|
modified:
KT-ID fisher test/7-7-fisher-galaxy_working.R |
| b |
| diff -r 76f8ac0fe858 -r aff861ca6e2b KT-ID fisher test/7-7-fisher-galaxy_working.R --- a/KT-ID fisher test/7-7-fisher-galaxy_working.R Mon Jan 14 15:19:26 2019 -0500 +++ b/KT-ID fisher test/7-7-fisher-galaxy_working.R Mon Jan 14 15:40:43 2019 -0500 |
| [ |
| @@ -658,10 +658,10 @@ SetOfAAs<-matrix(data = SetOfAAs,ncol = 1) -numberofY<-as.numeric(SubstrateBackgroundFrequency$Number.of.Y) +numberofY<-as.numeric(SubstrateBackgroundFrequency[,34]) numberofY<-numberofY[!is.na(numberofY)] -numberofPY<-as.numeric(SubstrateBackgroundFrequency$Number.of.pY) +numberofPY<-as.numeric(SubstrateBackgroundFrequency[,35]) numberofPY<-numberofPY[!is.na(numberofPY)] NormalizationScore<-sum(numberofPY)/sum(numberofY) |