# HG changeset patch
# User jfb
# Date 1570114805 14400
# Node ID 3437c03bb21e772ce3758bae61aa3097936eaf18
# Parent  7dff31e9a48f00b97d9a37a734b2f098c9d7282a
Uploaded

diff -r 7dff31e9a48f -r 3437c03bb21e scoring function/KinatestFisherScoring.R
--- a/scoring function/KinatestFisherScoring.R	Mon Apr 29 11:58:54 2019 -0400
+++ b/scoring function/KinatestFisherScoring.R	Thu Oct 03 11:00:05 2019 -0400
@@ -1006,7 +1006,7 @@
                           ALKNumeration<-c(ALKm6[s],ALKm5[r],ALKm4[i],ALKm3[j],ALKm2[k],ALKm1[l],ALKd0[m],ALKp1[n],
                                            ALKp2[o],ALKp3[p],ALKp4[q],ALKp5[u],ALKp6[v])
                           
-                          ThisKinPeptides[count,1:13]<-ThisKinTableNumeration
+                          ThisKinPeptides[count,1:13]<-as.numeric(ThisKinTableNumeration)
                           
                           AblPeptides[count,1:13]<-AblNumeration
                           ArgPeptides[count,1:13]<-ArgNumeration