From 0e38334fc225d15e2d92dd76c09f086ad3ecf02f Mon Sep 17 00:00:00 2001
From: "Deepankar@iMac" <deepankar.chakroborty@utu.fi>
Date: Fri, 27 Apr 2018 12:25:04 +0300
Subject: [PATCH] Fixed typo in plot title to iSCREAM.
---
3.FoldChange & Plots.R | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/3.FoldChange & Plots.R b/3.FoldChange & Plots.R
index 834187d..01a2e4a 100755
--- a/3.FoldChange & Plots.R
+++ b/3.FoldChange & Plots.R
@@ -212,7 +212,7 @@ Y.A <- list(
p=plot_ly(mini,alpha=0.7,x=~AAPos,y=~FC.reg,color=~VariantFrequency,size=~VariantFrequency,mode="text",text=~paste('EGFR ',AAchange,'</br> FC: ',round(FC.reg,digits = 3),'</br>- - - -</br>Variant frequency</br>Library: ',round(Lib.VF,digits = 3),'</br>Surving cells: ',round(VariantFrequency,digits=3),'</br>- - - -</br>Number of reads</br>Library: ',Lib.AD,'</br>Surving cells: ',NoLig.AD),colors = cols,sizes=c(50,300))%>%
add_markers()%>%
- layout(title = "EGFR iSREAM",xaxis = X.A,yaxis = Y.A)
+ layout(title = "EGFR iSCREAM",xaxis = X.A,yaxis = Y.A)
print(p)
#
#
--
GitLab