modified: script/Fig2.ipynb

Author: TuturBaba

script/Fig2.ipynb

@@ -50,7 +50,7 @@
     "  list_color <- strsplit(color, \",\")[[1]]\n",
     "  color_list <- gsub(\"__pd__\", \"#\", list_color)\n",
     "}else{color_list <- NULL}\n",
-    "\n",
+    "pdf <- FALSE\n",
     "if(!is.null(json_data$plotXsettings)){\n",
     "    if(json_data$plotXsettings == \"pdf\" || json_data$plotXsettings == \"PDF\"){\n",
     "      pdf <- TRUE\n",