fix printing bug (#115)

EmilHvitfeldt · web-flow · commit 9f36dc74f273 · 2025-12-03T15:41:20.000-08:00
diff --git a/NEWS.md b/NEWS.md
@@ -8,6 +8,8 @@
 
 * Added `show_query()` method for orbital objects. (#106)
 
+* Fixed printing bug where output would get malformed if coefficients had similarities. (#115)
+
 # orbital 0.3.1
 
 * Fixed bug where PCA steps didn't work if they were trained with more than 99 predictors. (#82)
diff --git a/R/orbital.R b/R/orbital.R
@@ -113,7 +113,7 @@ pretty_print <- function(x, digits = 7) {
   new_values <- unlist(new_values, use.names = FALSE)
 
   for (i in seq_along(old_values)) {
-    x <- gsub(old_values[i], new_values[i], x)
+    x <- sub(old_values[i], new_values[i], x)
   }
 
   x

Original file line number	Diff line number	Diff line change
`@@ -113,7 +113,7 @@ pretty_print <- function(x, digits = 7) {`
`113`	`113`	`new_values <- unlist(new_values, use.names = FALSE)`
`114`	`114`
`115`	`115`	`for (i in seq_along(old_values)) {`
`116`		`- x <- gsub(old_values[i], new_values[i], x)`
	`116`	`+ x <- sub(old_values[i], new_values[i], x)`
`117`	`117`	`}`
`118`	`118`
`119`	`119`	`x`