dendrof <- "%s"
load(inRData)
load(dendrof)
- """ % (self.pathout['RData.RData'], self.pathout['dendrogramme.RData'])
+ """ % (ffr(self.pathout['RData.RData']), ffr(self.pathout['dendrogramme.RData']))
txt += """
svg <- %s
""" % self.parametres['svg']
ptc <- tcp/sum(tcp)
dpt <- t(dpt)
dd <- dpt
- """ % self.parametres['var']
+ """ % self.parametres['var'].replace(u'*', u"\\\\*")
txt += """
classes <- n1[,ncol(n1)]
tcl <- table(classes)
ptc <- tcp/sum(tcp)
dpt <- t(dpt)
dd <- dpt
- """ % self.parametres['var']
+ """ % self.parametres['var'].replace(u'*', u"\\\\*")
txt += """
classes <- n1[,ncol(n1)]
tcl <- table(classes)