From: Pierre Date: Mon, 28 Jan 2013 23:17:57 +0000 (+0100) Subject: ... X-Git-Url: http://iramuteq.org/git?p=iramuteq;a=commitdiff_plain;h=99bd019932ede71b49857c66818865870b78dde0 ... --- diff --git a/Rscripts/afc_graph.R b/Rscripts/afc_graph.R index 5b12163..eb7da8c 100644 --- a/Rscripts/afc_graph.R +++ b/Rscripts/afc_graph.R @@ -77,7 +77,7 @@ if ( qui == 3 ) { ry <- range(table.in[,2], na.rm = TRUE) rz <- range(table.in[,3], na.rm = TRUE) } - if (exists(afctable)) { + if (exists('afctable')) { eff <- rowSums(afctable) } else { eff <- afctable$rowmass