Use R package jsonlite instead of rjson, to support the 'digits' option, which allows keeping fewer digits after decimal, thus saving disk storage space

1 files changed, 2 insertions, 2 deletions

diff --git a/Code/slice_TPM_to_JSON.py b/Code/slice_TPM_to_JSON.py
index e597b78..618310f 100644
--- a/Code/slice_TPM_to_JSON.py
+++ b/Code/slice_TPM_to_JSON.py
@@ -127,7 +127,7 @@ def make_json_file(expr_dict, dir_name, glb_param_dict):
 
 def make_json_file_using_r(dir_name, glb_param_dict): # use r script to make it faster
     r_code = '''
-	library(rjson)
+	library(jsonlite)
 	dir.name <- '%s'
 	tpm.file <- '%s'
 	take.log <- '%s'
@@ -141,7 +141,7 @@ def make_json_file_using_r(dir_name, glb_param_dict): # use r script to make it
 	    dir.create(dir.name)
 	}
 	for (i in 1:dim(X)[1]) {
-	    y <- toJSON(X[i,])
+	    y <- toJSON(X[i,], digits=I(3))
 	    file.name = paste(dir.name, paste(gene.id[i], 'json', sep='.'), sep='/')
 	    cat(y, file=file.name)
 	}