X-Git-Url: http://iramuteq.org/git?p=iramuteq;a=blobdiff_plain;f=Rscripts%2Fafc_graph.R;h=eb7da8c529b5e7f276b487796dad491853d7449b;hp=5b12163e7d4136b97f7a77199cafc73bcaf3eccc;hb=de4de1d1befab72d8e2e40625153e85b0799628e;hpb=fc14fc86c13eb0ed0f420771b08cc42a5db90c01

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