X-Git-Url: http://iramuteq.org/git?p=iramuteq;a=blobdiff_plain;f=PrintRScript.py;h=037c5598a68eeb8165c2075805d919755127d052;hp=7f7e4c24791dae4803a26b3be6718a50ab7e26e5;hb=0926e09cbfbd5c0d1bc654059a64924364d2b332;hpb=e950507e6d72b808f1f06131eaa561676eb27fad

diff --git a/PrintRScript.py b/PrintRScript.py
index 7f7e4c2..037c559 100644
--- a/PrintRScript.py
+++ b/PrintRScript.py
@@ -238,7 +238,7 @@ def RchdTxt(DicoPath, RscriptPath, mincl, classif_mode, nbt = 9, svdmethod = 'sv
         plot(tree.cut2$tree.cl)
         dev.off()
         open_file_graph("%s", width = 600, height=400)
-        plot(tree.cut1$dendro_tot_cl)
+        plot(tree.cut2$dendro_tot_cl)
         dev.off()
         """ % (ffr(DicoPath['dendro2']), ffr(DicoPath['arbre2']))
         
@@ -1210,6 +1210,6 @@ class TgenSpecScript(PrintRScript):
         colnames(result) <- colnames(tgen)
         row.names(result) <- rownames(tgen)
         write.table(result, file = "%s", sep='\\t', col.names = NA)
-        """ % self.pathout['tgenspec.csv']
+        """ % ffr(self.pathout['tgenspec.csv'])
         self.add(txt)