remove an extra space after ifelse since ifelse is a function

Merck · Apr 15, 2024 · a198ffb · a198ffb
1 parent f999506
commit a198ffb
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/conversion.R b/R/conversion.R
@@ -93,7 +93,7 @@ convert <- function(text,
 
   unicode_int <- as.integer(as.hexmode(unicode_latex$unicode))
   char_latex <- ifelse(unicode_int <= 255 & unicode_int != 177, unicode_latex$chr,
-    sprintf("\\uc1\\u%d*", unicode_int - ifelse (unicode_int < 32768, 0, 65536))
+    sprintf("\\uc1\\u%d*", unicode_int - ifelse(unicode_int < 32768, 0, 65536))
   )
 
   names(char_latex) <- unicode_latex$latex