Fix R syntax

Author: bbimber

singlecell/src/org/labkey/singlecell/pipeline/singlecell/SubsetSeurat.java

@@ -81,7 +81,7 @@ protected List<String> loadChunkFromFile() throws PipelineJobException
                     String subsetEscaped = subset.replace("'", "\\\'");
 
                     ret.add("\tif (!is.null(seuratObj)) {");
-                    ret.add("\tprint(paste0('Subsetting dataset: ', datasetId, ' with the expression: '" + subsetEscaped + "'))");
+                    ret.add("\tprint(paste0('Subsetting dataset: ', datasetId, ' with the expression: " + subsetEscaped + "'))");
                     ret.add("\t\tcells <- c()");
                     ret.add("\t\ttryCatch({");
                     ret.add("\t\t\tcells <- WhichCells(seuratObj, expression = " + subset + ")");