- hapax <- read.csv2("%s", header = FALSE, row.names = 1)
- tot <- rbind(tot, hapax)
+ """ % (self.parent.RscriptsPath['Rgraph'], self.pathout['total.csv'])
+ if len(hapax) :
+ txt += """
+ hapax <- read.csv2("%s", header = FALSE, row.names = 1)
+ tot <- rbind(tot, hapax)
+ """ % self.pathout['hapax.csv']
+ txt += """