minor fix

mass-a · mass-a · commit a738900b940a · 2022-01-21T11:14:52.000+01:00
diff --git a/R/utils.R b/R/utils.R
@@ -12,7 +12,7 @@ find.nn <- function(q, assay = "RNA", slot="data", npca=30, nfeatures=2000, k.pa
   if (ngenes < nfeatures) {
      nfeatures <- ngenes
   }
-  if (ngenes <- npca) {
+  if (ngenes < npca) {
      npca <- ngenes
   }
   

Original file line number	Diff line number	Diff line change
`@@ -12,7 +12,7 @@ find.nn <- function(q, assay = "RNA", slot="data", npca=30, nfeatures=2000, k.pa`
`12`	`12`	`if (ngenes < nfeatures) {`
`13`	`13`	`nfeatures <- ngenes`
`14`	`14`	`}`
`15`		`- if (ngenes <- npca) {`
	`15`	`+ if (ngenes < npca) {`
`16`	`16`	`npca <- ngenes`
`17`	`17`	`}`
`18`	`18`