From: Pierre Ratinaud Date: Mon, 24 Apr 2017 09:32:04 +0000 (+0200) Subject: dist labbe X-Git-Url: http://iramuteq.org/git?p=iramuteq;a=commitdiff_plain;h=0549ce20c3cb5d52e86fd7e08ae3f87184a1b051;hp=cae026cb9d5c6997818bff728f382f55a1d73acf dist labbe --- diff --git a/PrintRScript.py b/PrintRScript.py index af4a9bf..e312ee0 100644 --- a/PrintRScript.py +++ b/PrintRScript.py @@ -1316,7 +1316,7 @@ class LabbeScript(PrintRScript) : self.analyse.parent.RscriptsPath['Rgraph']]) txt = """ tab <- read.csv2("%s", header=TRUE, sep=';', row.names=1) - """ % (self.pathout['tableafcm.csv']) + """ % (ffr(self.pathout['tableafcm.csv'])) txt += """ dist.mat <- dist.labbe(tab) dist.mat <- as.dist(dist.mat, upper=F, diag=F) @@ -1328,7 +1328,7 @@ class LabbeScript(PrintRScript) : par(cex=1.2) plot.phylo(as.phylo(chd), type='unrooted', lab4ut="axial") dev.off() - """ % (self.pathout['distmat.csv'], self.pathout['dist-labbe.png']) + """ % (ffr(self.pathout['distmat.csv']), ffr(self.pathout['dist-labbe.png'])) self.add(txt) self.write()