Fixed forgot to cast ArrayList to List

chirayukong · chirayukong · commit 33fb993ea061 · 2017-12-08T17:59:11.000-05:00
diff --git a/R/lofs.R b/R/lofs.R
@@ -25,6 +25,7 @@ lofs <- function(tetradGraph, dfs, dataType = 0, numCategoriesToDiscretize = 4,
     	}
         datasets$add(boxData)
     }
+    datasets <- .jcast(datasets, "java/util/List")
     
 	lofs <- list()
     class(lofs) <- "lofs"

Original file line number	Diff line number	Diff line change
`@@ -25,6 +25,7 @@ lofs <- function(tetradGraph, dfs, dataType = 0, numCategoriesToDiscretize = 4,`
`25`	`25`	`}`
`26`	`26`	`datasets$add(boxData)`
`27`	`27`	`}`
	`28`	`+ datasets <- .jcast(datasets, "java/util/List")`
`28`	`29`
`29`	`30`	`lofs <- list()`
`30`	`31`	`class(lofs) <- "lofs"`