attempt-3

James-Thorson-NOAA · Oct 25, 2024 · 8f22ccc · 8f22ccc
1 parent 366eed4
commit 8f22ccc
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/make_dsem_ram.R b/R/make_dsem_ram.R
@@ -369,7 +369,7 @@ function( sem,
   }
   #rownames(ram) = NULL
   #f = \(x) sapply(mat2triplet(drop0(x)),cbind)
-  f = \(x) matrix(unlist(drop0(x)),ncol=3)
+  f = \(x) matrix(unlist(mat2triplet(drop0(x))),ncol=3)
   ram = rbind( cbind(1, f(P_kk)),
                cbind(2, f(G_kk)) )
   ram = data.frame( ram, startvalues[ram[,4]] )