X-Git-Url: http://iramuteq.org/git?p=iramuteq;a=blobdiff_plain;f=PrintRScript.py;h=f4e20a1ccfc8976693c1a9c8fa4d2e1a963a6af0;hp=45022f3ee201457f43fe91c7272455bc24724e03;hb=f4cba135ed6aed06ee15e9d41a9091101a4c1bef;hpb=a503f041dc4947ee21c1d353ddd05ddb13a5e322 diff --git a/PrintRScript.py b/PrintRScript.py index 45022f3..f4e20a1 100644 --- a/PrintRScript.py +++ b/PrintRScript.py @@ -460,10 +460,12 @@ def print_simi3d(self): movie = "'" + ffr(os.path.dirname(self.DictPathOut['RData'])) + "'" else : movie = 'NULL' - if self.section == 'chd_dist_quest' : - header = 'TRUE' - else : - header = 'FALSE' + + #if self.corpus.parametres['type'] == 'corpus' : + # header = 'TRUE' + #else : + # header = 'FALSE' + header = 'FALSE' txt += """ dm<-read.csv2("%s",row.names=1,header = %s) load("%s") @@ -781,7 +783,8 @@ class PrintSimiScript(PrintRScript) : txt += """ et <- list() """ - for i,et in enumerate(self.tableau.etline) : + print self.parametres + for i,et in enumerate(self.parametres['stars']) : txt+= """ et[[%i]] <- c(%s) """ % (i+1, ','.join(et[1:]))