diff --git a/admin/survey/modules/mod_NIJZ/R/Nijz_report.R b/admin/survey/modules/mod_NIJZ/R/Nijz_report.R
index 7e35f0ea4..120756d18 100644
--- a/admin/survey/modules/mod_NIJZ/R/Nijz_report.R
+++ b/admin/survey/modules/mod_NIJZ/R/Nijz_report.R
@@ -213,8 +213,8 @@ radarchart2 <-
     if (!is.null(vlabels)) 
       VLABELS <- vlabels
     if (is.null(vlcex)) 
-      text(xx * 1.2, yy * 1.2, VLABELS,  srt=20)
-    else text(xx * 1.2, yy * 1.2, VLABELS, cex = vlcex,  srt=20)
+      text(xx * 1.4, yy * 1.4, VLABELS,  srt=20)
+    else text(xx * 1.4, yy * 1.4, VLABELS, cex = vlcex,  srt=20)
     series <- length(df[[1]])
     SX <- series - 2
     if (length(pty) < SX) {
@@ -368,7 +368,7 @@ colnames(mydf) <- labels
 
 #par(col="#004078", font = 2, cex = 1.4)
 
-par(col="#004078", font = 2, cex = 1.3, xpd = TRUE, mar = c(0, 0, 2, 0))
+par(col="#004078", font = 2, cex = 1.8, xpd = TRUE)
 # Plot a radar chart 
 radarchart2(
   mydf,